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Editor' ' 



LA CRISIS DE LOS Ks 



A estas alturas del ano, cuando solo nos resta por 
ver lo que pueda ofrecernos el SIMO, y ya se intuye 
la presion publicitaria de las campanas de Navidad, 
es el momento de hacer un repaso de lo que microin- 
formaticamente ha sido el ano 86. Lo iniciamos, ilu- 
sionadamente, con' la Uegada de los 128 K. Tanto 
-jQpmmodore como Sinclair parecfan dispuestos a sa- 
tisfacer la demanda de Ks de memoria que exigi'an 
los usuarios para sentir que sus maquinas no se que- 
daban atras en el imparable avance de los micros por 
alcanzar las capacidades mitologicas de los grandes 
ordenadores. Sin embargo, en estos ultimos meses, 
los fabricantes ban decidido reconsiderar el camino 
que habrfan de tomar sus nuevos productos. 

Los que intufan una progresion geometrica de las 
capacidades de memoria que se proyectaba asi hacia 



el infinito, se han encontrado con que Commodore 
ha disenado una bonita carcasa para su clasico C-64. 
Y que Sinclair-Amstrad, aunque ha hecho bastante 
mas por su 128 (le ha incorporado un cassette, un 
chip de sonido y alguna cosa mas) no ha superado el 
liston de los 128 K alcanzado el invierno pasado ni 
en un solo bit. Si no hubiera sido por el software el 
ano del Cometa, del Amiga y de la caida de los pre- 
cios de los PC compatibles, habria sido un ano gris 
para nuestros micros. Han sido los creadores de pro- 
gramas los que han dado el do de pecho y han pues- 
to en evidencia las autenticas capacidades de estas 
magmficas maquinas. De su trabajo teneis una am- 
plia muestra en la revista de software de este nume- 
ro. Disfrutad con ellos de vuestro micro, y el aho que 
viene ya veremos... 



LOS MEJORES DE INPUT 



Hemos pensado que es interesante disponer de un ranking que 
ponga en claro, mes a mes, cuales son los programas preferidos 
de nuestros lectores. Para ello, es obligado preguntaros directamen- 
te y tener asi el mejor termometro para conocer vuestras preferen- 
cias. Podeis votar por cualquier programa aunque no haya sido co- 
mentado todavia en INPUT. 



El resuitado de las votaciones sera publicado en cada numero 
de INPUT 

Entre los votantes sortearemos 1 cintas de los titulos que pidais 
en vuestras cupories. 

Nota: No es precise que corteis la revista, una copia hecha a 
maquina o una simple fotocopia sirven. 



Enviad vuestros votos a: LOS MEJORES DE INPUT P.° de la Castellana, 93. Planta 14. 28046 Madrid 



ELIGE TUS PROGRAMAS 



Primer titufo eleaido 



Tercer titufo elegido L 



J i i i i 



J L L 



I 

■ Que ordenador tienes L_L_J_J_I 

* 

I 



1.*ApeJlido t__i I i i i ) i 



] Fecha de nacimienta I 



J I J I L 



Direccifa I i i i 



J J I L 



Provincia I i i 



J L 



J L 



J L 



J L 



J L 



J L 



J L 



l_. 



J I I I L 



J L I I L 



J I I 



J I I I L 



J I I I L 



J I 1 1 I 



J I I I I 



Segundo tftulo elegido 



I I I I L 1 i I I I I I LJL 



Programa que te gustarta conseguir I i i 

Nombre I j i i i i i i i i i 

2." Apellido I l_i 

Teleforro I i i i i i i i i i i 

Localidad I i i i i i i i i i i 



J I I L 



J 1 l__L 



.1 I I L 



-Jl L L 



J 1 1 L 



INPUT COMMODORE N.° 14 




ONSTRUYE 



PROPIO 
)NSTRUO 

/ 

; / : : .".'0" " ' ':- '-''!; 



Instrucciones W Pantallas 

en P. A ST FT" 

fcvp 2500. pts 



' en CASTELL 
!\/f A Yj- * Corrimod 




* Cr* * orreo 5./ 

**» ;. ****** 




G RAFICOS 
PAGINADOS 



icer el fundamento de los gfafi- 
p aginados abre un mundo hacia las 
lidades de esta tecnica. Algun 
: ~plo demuestra como funciona en 

d Commodore ,64? 

Los graficos paginados — tecnica de 
::nmutar desde una pagina grafica a 
— ofrecen un potencial considera- 
ble en muchos tipos diferentes de apli- 
cationes en las que se precisa un cam- 
bio rapido de los datos de una panta- 
lla a los de otra. Aunque su utilization 
obvia es la animation de imagenes con 
ordenador, pueden ser aplicadas en 
usos mas serios, siendo un ejemplo los 
diagram as que muestran cifras en pan - 
talla, tal como es el caso de programas 
fmancieros. 

El principio que se esconde tras los 
graficos paginados consiste en definir 
y despues confinar en la memoria los 
datos correspondientes a pantallas di- 
ferentes. Estos datos pueden tomar la 
forma de graficos en alta o baja reso- 
lution o fncluso texto, tal vez una 
combination de ellos. Cada una dc es- 
tas pantallas puede ser llama da en una 
sucesion muy rapida, sin necesidad de 
tiempo para calcular como Ilenar cada 
una de las pantallas. 

El tiempo para llenar la pantalla si- 
gue siendo un requerimiento, pero so- 
lamente es necesario hacerlo una vez 
para cada pantalla diferente antes de 
comenzar a visualizarlas. Despues se 
confinan en zonas adecuadas de la me- 
moria, pudiendo reclamarse instanta- 
neamente cuando se requieran. 

RESTRICCIONES DE LA MiEMORiA 

Cada «pagina» de datos de pantalla 
requiere una determinada cantidad de 
memoria. La cantidad necesaria varia 
debido a que cuantos mas colores uti- 
hces, y mayor sea la resolution de los 
graficos mas se necesitara. En algunos 

6 INPUT 




GRAFICOS PAGINADOS 



Li MITES DE LA MEMORIA 



TECNICAS DE PAGINACION 



PRO GRAMA DE ANIMACION 



PARA C-64 



2 y 4 asf como las 3 y 5, es tal que poco 
se nota si ambas son en realidad la 
misma imagen. Esto produce una se- 
cuencia 1,2,3,2,3,1, etc. La secuencia 
sigue siendo de cinco imagenes, pero 
solo se precisan tres pantallas. 

En el Commodore 64 solamente se 
pueden almacenar dos pantallas de 



casos existen severas restricciones de 
memoria en funcion del programa. Es 
entonces cuando hay que reducir el 
uso de la pantalla a solamente una 
fraction de su tamano normal. Tam- 
bien es necesario a menudo sacrificar 
colores y resolution. Es obligado de- 
fjar espacio en la RAM para el progra- 
!ina. 

La tecnica de la pagination puede 
llamar a pantallas individuales deposi- 
tadas en la memoria, siguiendo cual- 
quier or den y mas de una vez en cual- 
quier secuencia que sea preciso, 

Por tanto es factible construir una 
secuencia de pagination de quizas 
ocho pantallas, aunque en realidad 
existan hiuchas menos presentes en la 
memoria. Esta util tecnica de ahorro 
de memoria es especialmente efectiva 
si tenemos cuidado de asegurar que 
los graficos de las pantallas repetidas 
intermediamente no hagan nada en 
detrimento del «flujo» de la anima- 
tion. 

Por ejemplo, un programa que 
muestre a un hombre de alambre an- 
dando, podria utilizar las paginas 
1,2,3,4,5,1,2,3,4,5, etc. Sin embargo 
donde el espacio sea una limitaci6n, la 
similitud entre dos imagenes, p. ej. las 




alta resolution simultaneamente. 
Contener una imagen de una pantalla 
por mapa de bits significa 8 Kbytes de 
memoria. Afortunadamente se pue- 
den utilizar secciones mas pequenas 
de la pantalla de cara a incrementar el 
numero dc paginas disponibles para 
este tipo de graficos y esto es lo que 
hace el ejemplo que sigue para obte- 
ner un total de cinco paginas. 

Este programa hace uso del cartu- 
cho Simon's BASIC. Este cartucho 
ocupa la RAM situada entre las direc- 
tion es 8192 y 16384, siendo conve- 
niente utilizar la RAM que hay mas 
arriba para las paginas graficas. 

■teflKfiJI para Commodore-64 

20 POKE 51 ,255:FOKEL 52,29: 
POKE 55,255 :P0KE 56,29: 
CLR 




30 


60SUB 220 


190 


NEXT N 


,1 EOF 


A9 


EO 




LDA 


#$E0 


40 


D=64 


200 


GOTO 150 


,1E11 


85 


FC 




STA 


$FC 


50 


FOR N=0 TO 4 


220 


FOR Z=7680 TO 7738 : READ 


,1E13 


A9 


40 




LDA 


#$40 


60 


HIRES 0,1 :MULTI 7,4,3: 




X:POKE Z,X:NEXT Z : RETURN 


,1E15 


85 


FE 




STA 


$FE 




COLOUR 6,0 


230 


DATA 169,0,141,14,220, 


,1E17 


AO 


00 




LDY 


#$00 


70 


FOR 2=1 TO 12: FOR ZZ=1 TO 




169,53,133,1 


,1E19 


B1 


FB 




LDA 


($FB) ,Y 




3: LINE Z*Z+ZZ*(N+1),0,Z*Z 


240 


DATA 169,0,133,251 ,133, 


,1E1B 


91 


FD 




STA 


($FD) ,Y 




+ZZ*CN+1 ) ,100, ZZ 




253,169,224,133,252,169, 


,1 E1D 


CO 


3F 




CPY 


#$3F 


75 


PLOT RND(1)*160,RND(1)* 




64,133,254,160,0 


,1E1 F 


DO 


10 




BNE 


$1 E31 




100,RND(1)*3+1 :NEXT ZZ,Z 


250 


DATA 177,251,145,253,192 


,1E21 


A5 


FC 




LDA 


$FC 


80 


FOR ZZ=1 TO 3:LINE 0,(N* 




,63,208,16,165,252,201, 


,1E23 


C9 


EB 




CMP 


#$EB 




13)+ZZ*(N+1),159,(N*19)+ 




235,208,10 


,1E25 


DO 


OA 




BNE 


$1 E31 




ZZ*(N+1),ZZ:NEXT ZZ 


260 


DATA 162,1,142,14,220, 


,1E27 


A2 


01 




LDX 


#$01 


90 


FOR ZZ=1 TO 3: CIRCLE 10+ 




162,55,134,1,96,200 


,1E29 


8E 


OE 


DC 


STX 


$DCOE 




N*35,60,20-ZZ*3,10+N*3,ZZ 


270 


DATA 208,229,230,252,230 


,1E2C 


A2 


37 




LDX 


#$37 




: NEXT ZZ 




,254,76,25,30 


,1E2E 


86 


01 




STX 


$01 


100 


GOSUB 430:D=D+12 


430 


POKE 7700, D: POKE 7706, 


,1E30 


60 






RTS 




110 


NEXT N v x 




251 :POKE 7708,253:SYS 


,1E31 


C8 






INY 




130 


BLOCK 0,0,159,199,3 JiJ 




7680: RETURN 


,1E32 


DO 


E5 




BNE 


$1 E19 


140 


TEXT 0,100., ^Mg 


440 


POKE 7700,D:POKE 7706, 


,1E34 


E6 


FC 




INC 


$FC 




"ANIMACION",0 JB$' 




253:P0KE 7708,251 ;SYS 


,1E36 


E6 


FE 




INC 


$FE 




,8,19 ^^■T^. 




7680:RETURN 


,1E38 


4C 


19 


1E 


JMP 


$1E19 



DESENSAMBLADO DEL CODIGO 
HAQUINA. 



150 D=64:F0R N=0 TO 4 
170 GOSUB 440 : D=D+12 : FOR 
TO 15:NEXT T 



T=1 



,1E00 
,1E02 
,1E05 
,1E07 
,1E09 
,1E0B 
,1E0D 



A9 
8D 
A9 
85 
A9 
85 
85 



00 
OE 
35 
01 
00 
FB 
FD 



DC 



LDA 
STA 
LDA 
STA 
LDA 
STA 
STA 



#$00 

SDCOE 

#$35 

$01 

#$00 

$FB 

$FD 



Este programa comienza ajustando 
el tope para el texto en BASIC sufi 
cientemente debajo del Simon's para 
aceptar (ver el CLR) una eorta rutina 
en codigo maquina que maneje la pa- 
ginacion entre pantallas. Esta rutina 
se carga en la mem or i a por medio de 
la subrutina que comienza en la linea 
220, siendo aceedida posteriormente, 
tanto para almacenamiento como para 
llamadas, por sentencias SYS. 



GANADORES DE LOS MEJORES OE INPUT COMMODORE 



En el sorteo correspond iente al numero 14 entre quienes escribisteis mandando vuestros votes a LOS 
MEJORES DE INPUT han resuKado ganadores: 



NOMBRE 



LOCALS DAD 



JUEGO ELEGIDO 



Joan Minguell Arrufat 
Alfredo Rodriguez Nogeira 
Pedro Castano Perez 
Manuel Martin Gimenez 
Carlos Mateo Ballorca 
L Carlos Martinez Zapata 
Rafael PeYez Delgado 
J. Javier Munoz Romero 
J. Ramon Rogada Arribas 
Antonio Martinez Alvarez 



Borges Blanques (Lerida) 
Valladolid 

H. de Llobregat {Barcelona) 

Almeri'a 

Burgos 

Madrid 

Huelva 

Barcelona 

Mieres (Asturias) 

Barcelona 



Skyfox 
Rambo 
Skyfox 
Saboteur 
Kung Fu Master 
Green Beret 
Green Beret 
Pistop il 
Green Beret 
«V» 



INPUT 



program***" 



El primero de los punteros dc la 
pantalla es establecido en la linea 40 
en el comienzo del area de RAM dis- 
ponible debajo del Simon's. El pro- 
grama continua con una rutina de di- 
bujo para las cinco pantallas, recu- 
rriendo al bucle FOR. . .NEXT de la li- 
nea 50. 

Las line as 60 a 90 manejan el dise- 
no en si. Cuando esta completo el tra- 
bajo de dibujo, se accede a la rutina 
con POKEs de la lmea 440, haciendo 
una Hamad a SYS a la rutina en codi- 
go maquina. Asi es confinado el pri- 
mer bloque de dibujo en su lugar ade- 
cuado de la memoria. 

Despues continua el bucle trazando 
las otras cuatro pantallas, situadas 
cada una en un bloque de 3 Kbytes por 
medio del ajuste de punteros realiza- 
do con D - D + 12 en la linea 100. 

La lmea 130 limpia la pantalla y la 



tine de azul claro, imprimiendo con la 
linea 140 un mensaje de comienzo de 
la secuencia que le sigue. 

El puntero de memoria D es inicia- 
lizado a su valor original de 64, la di- 
rection inicial de la primera pantalla 
que existe inmediatamente debajo del 
final del Simon's. 

La primera de las cinco pantallas es 
llamada a partir de este momento con 
la linea 440, que vuelve a acceder a la 
rutina en codigo maquina de la direc- 
tion 7680. 

El puntero es ajustado en la linea 
170 (D = D + 12) para la siguiente 
pantalla. Se produce una pequena dc- 
mora de tiempo con el bude T= 1 TO 
15, y la nueva pantalla pasa a solapar- 
se sobre la anterior. Se repite lo mis- 
mo a traves de los cinco cuadros, res- 
taurandose el puntero original al com- 
pletarse cl bucle. 



Puedes utilizar la misma rutina en 
codigo maquina para tus propios pro- 
gramas, acordandote de establecer la 
coordenada de la esquina inferior de- 
recha de la pantalla y ajustar el valor 
del byte bajo en lugar del 63 y el va- 
lor del byte alto sustituyendo al 253 de 
la linea 250 cuando utilices el Simon's 
BASIC. 

Si no utilizas el cartucho para tra- 
bajar en alta resolution, recuerda que 
las direcciones de la memoria de pan- 
talla comienzan en 8192 (bajo 0, alto 
32) y no en 57344 como con el Si- 
mon's. 

Si tu diseno implica un tamano de 
pantalla interior, libera mas memoria 
para paginacion, ajusta los bucles 
FOR. ..NEXT, incrementando el va- 
lor del puntero D para adecuarse al 
numero y tamano de la memoria de 
cada pagina. 



program*^, 



■ 


EXPONENTES 


■ 


COMA FLOTANTE 


■ 


NUMEROS NEGATIVOS 


■ 


ALMACENAMIENTO DE 


NUMEROS EN MEMORIA 



94 NEXT F:F=0 

96 IF F=LEN(N$) THEN N$= 

LEFT$(N$,LEN(N$)-1) : 

GOTO 100 
98 IF FOO THEN N$=LEFT$ 

(N$,N$,F-1)+MID$(N$,F+1) 




+"."+MID$(N$ / F+2) :G0T0 80 
100 N$=N$+"0":60TO 80 
110 IF RIGHT$(N$,1)="."THEN 

N$=LEFT$(N$,LEN(N$)-1) 
120 GOTO 180 

130 IF ABS(N)>=1 THEN 170 
140 N=N*1 

142 FOR F=1 TO LEN(N$):IF 

MID$(N$,F / 1)="-"THEN 146 
144 NEXT F:F=0 
146 IF F=1 THEN N$="0"+MID$ 

(N$,,2):GOT0 130 
150 IF FOO THEN N$=LEFT$CN$ 
,F-2)+"."+MID$(N$,F-1 ,1) 
+MID$(N$,F+1) :G0T0 130 
160 N$="."+N$:G0T0 130 
170 IF VAL(A$)<0 THEN N$="-" 
+N$ 

180 PRINT'TSHIFT+CLR/HOMEl"; 
A$;'TCRSR dcha.lIGUAL A" 
: PRINT N$ 
190 GOTO 20 

200 IF ABSCNX1 THEN 220 
210 IF ABS(N)>=10 THEN E=E+1 

:N=N/10:G0T0 210 
215 GOTO 230 

220 IF ABSCN)<=1 THEN E=E-1 : 

N=N*10:GOTO 220 
230 PRINT'TSHIFT+CLR/HOMEU 
CCRSR dcha-3";A$;"CCRSR 
dcha.HlGUAL A":PRINT N; 
"CCRSR izqda.]";:IF E<>0 
THEN PRINT M E"; E 
240 PRINT:GOTO 20 

Cuando ejecutes este programa, el 
ordenador espera que escribas un nu- 
mero. Deberas teclear un numero po- 
sitivo en forma clasica o exponencial. 
No te preocupes si continuan sin sa- 
ber lo que es un exponencial, pronto 
lo haras. Para convertir un numero es- 
crito con exponente en uno mas signi- 
ficativo para ti, necesitas simplemente 
multiplicar los primeros dfgitos del nu- 
mero (conocidos por mantisa) por 10 
elevado a la potencia de la cantidad 
que sigue a E, que es conocido como 
exponente de ese numero. 

Aunque esto suena bastante 
complicado, si lo trabajas paso a 
paso, rapidamente se ve claro. 
Toma 1.23E4 para convertirlo a la 
forma usual, multiplica la mantisa 
(1.23) por 10 elevado a la potencia 
del exponente, que es igual a 



1,23*10.000. Asi que 1,23E4 es lo mis- 
mo que 12,300. 

Para cualquier numero, la mantisa 
toma siempre un valor de un digito se- 
guido por una coma decimal, varian- 
do por tanto entre 1,0 y 9,999999... 

Los numeros negativos se manejan 
igualmente, solo que la mantisa toma 
un valor negative Si lo negativo es la 
mantisa, el efecto es diferente, pero 
veamoslo mediante la utilizaeion del 
programa. 



ALMACENAMIENTO DE 
NUMEROS 

El conocimiento de los numeros ex- 
ponenciales puede ser interesante, 
pero tambien son utiles para mejor co- 
nocer la forma en que la mayorfa de 
los ordenadores almacenan los nume- 
ros. 

Cuando tecleas un comando tan 
simple como PRINT 10*10, el ordena- 
dor los trata realmente con mas deta- 
lle. Traduce los numeros en un tipo de 
formato exponencial llamado «coma 
flotante» (punto flotante para los an- 
glosajones) y los calcula con esta for- 
ma. 

Existe tambien otra complicacion. 
Como podras ver en el artfculo. desti- 
nado a la creacion de GDUs (Grafi- 
cos Definidos por el Usuario) desde el 
BASIC, los ordenadores almacenan 
cada numero en binario, o base dos. 

Para mostrar como se guardan los 
numeros en la RAM de tu ordenador, 
sigue este ejemplo de un calculo basa- 
do en el numero 10. 

El primer paso es convertirlo a bi- 
nario, lo que da los numeros 
00001010,00000... 

Los cuatro primeros ceros de este 
numero en binario no significan nada, 
y podria facilmente haberse prescindi- 
do de ellos, lo que nos deja con 
1010,00000... Como vimos previamen- 
te, un numero decimal con exponente 
consiste en un numero situado entre 
1,0 y 9,999999... Cuando se almacena 
un numero en coma (punto) flotante 
en el ordenador, la mantisa consiste 
en un numero binario que siempre co- 
mienza en .1. 

Esto es posible debido a que el ta- 



INPUT 1 1 



mano dc la parte exponencial del nu- 
mero determina la position de una 
«coma binaria», el equivalente binario 
de la coma decimal. Como es algo de- 
finido automaticamente , la mantisa no 
necesita especificar donde se situa la 
coma. 

Existe un problema: ^,c6mo ajustas 
el exponente para mostrar donde de- 
beria estar el punto binario, y como 
conviertes el numero binario para que 
comience en .1? 



DESPLAZANDO LA COMA 



En efecto, la respuesta a ambos 
problemas es la misma. Todo lo que 
haras es desplazar la coma hasta que 
se enfrente al primer 1 y por cada lu- 
gar que se mueva la coma anadiras un 
1 al exponente. Por ejemplo, con el 
numero decimal 58 (111010.000 en bi- 
nario), la coma binaria se mueve gra- 
dualmente hacia la izquierda. hasta 
que no haya numeros a su izquierda, 



unicamente ceros. En este caso has 
desplazado la coma 6 lugares a la iz- 
quierda, por lo que el exponente es 
+6 y la mantisa .11101000... 

En efecto, el exponente comienza 
valiendo 128, por razones que descu- 
briras mas tarde, le sumaras el ante- 
rior numero. De esta forma, el expo- 
nente del ejemplo con el numero 58 
se convierte en 128+6= 134, que el 
ordenador almacena en forma binaria. 

Para recapitular, el ordenador al- 
macena la parte exponencial del nu- 
mero en un byte y tambien la manti- 
sa, que puede utilizar hasta 4 bytes, 
tres de los cuales serian llenados con 
ceros en este ejemplo. 

Cualquier numero en coma flotante 
puede ocupar hasta cinco bytes . Esto 
limita el tamano del numero maximo 
que puede almacenarse en el ordena- 
dor. El Cmico byte dedicado al expo- 
nente da un maximo posible de 2 ele- 
vado a la potencia 127. Podria ser has- 
ta 255, pero el primer bit es utilizado 
para el signo del exponente. 



El maximo numero utilizable por la 
mantisa es .11111 etc, con todos los 
bits valiendo 1. esto se aproxima mu- 
cho a 1.000 etc., que es el valor 1 tan- 
to en binario como en decimal. El me- 
nor numero es .1000 etc. siendo todos 
excepto el primer bit. El primero ha 
de ser un 1 puesto que la coma (pun- 
to) binaria se desplaza hasta alcanzar 
el primer 1 del numero. Por otra par- 
te, conviene saber que .1 es el equiva- 
lente binario de 1/2 en decimal. 

Multiplicando las dos partes del nu- 
mero, puedes hallar el mayor numero 
almacenable en formato de coma flo- 
tante, que es 1.70141E38. Puedes em- 
plear el programa de mas adelante 
para comprobar como lo almacena el 
ordenador. 



CASOS ESPECIALES 



Ahora que tienes una completa idea 
del proceso, veremos que existen dos 
variaciones a ello. 



BARATCOMMODORE 



CONTAB1UDAD PERSONAL Permite llevar el control <k sus cuentaj domestical 30 
cuentas de gastos y 20 de ingresos. 3 cuentas bancarias y I de caja. D<agrema de barraj. 
Informes pa conceptos. {dj 34)00 (cj 2,500 

SIMULA DOR DE SPECTRUM, Transforma su C-64 en un Spectrum de 
48K. Admite programa s en BASIC de Spectrum (cj 2.500 

PERSPECTIVE. Processor de imageries de figuras volumetros 
que obtiene en graficos de alta res., perspeaivas conicas, axonometri- 
cas, planta y alzado de una figura definida a parttr de coorde- 
nadas fcj 5.S00 (dj 6.000 

PROTEXT, Frocesador de textos de facil manejo por ventanas, con caracteres espafioles. 
Visionado del texto por pantalla en 80 columnas. fd] 7.950 



IMPRESORA AMSTRAD 2000 Centronics. 105 c.p.s. 43.000 

1 MPRES0RA AMSTRAD 2000. Interface Commodore 48.000 

UNIDA0 DISCOS COMMODORE 1571 63.900 

UNIDAD DISCOS COMMODORE 1570 49.900 

UNIDAD DISCOS COMMODORE 1541 42.900 




iISMBT-iS 



5 1/4 GARANTEADQS. GENTR0 REFORZADO. 
SS/DD. 43 TPtEspec^ COMMODORE, APPLE,ATARL U0 nnidnries)— 



1.900,- 



JOYSTICK QUICKSHOT II plus con microrruptores 2.950 

QUiCKDISC +. Mas de 7 funciones extras 4.900 
FINAL CARTRIDGE (Nueva version con FREEZER) 9.900 
CABLE 80/40 COLUMNAS para 128 

(adaptable a cualquier monitor) 3. 1 00 
DISK WOTCHER. 

(Taladro para discos Simple cara) 1.950 

FUENTE DE AUMENTACION C-64 Y VIC-20 6-500 



WWAKE 



CO DEM ASTER 

Primero de una serie de programas pensados para que aprovecrte al maximo las posi - 
bilidades del AMIGA. Parti endo del diseno de una pantalla y espectficaciones de un 
fichero, esta aplieacion genera un completo programa en AMIGA/BASIC que le per- 
mitira crear y mantener una sofisticada BASE DE DAT0S, segun especificaciones y 
con la posibiMdad de adaptarla a sus futuras necesidades, 



38.000 pt«.». 



BCKEENMASTEK 

Tratamiento avanzado de entradas y salidas por 
pantalla. Definition de campos, operaciones ma- 
tematicas entre campos, formateo, etc... Imple- 
mentado para poder accederfkilmente a las dis- 
tintas rutinas del basic. 



Gestion deficheros para AMIGA. Permits gene- 
ral ficheros FSAM aceesibles desde basic. Co- 
rn ando para lectura, grabacion, adualizacion, 
busqueda por claws. 

Capacidad de fichero limitada unicamente por 
ia capacidad del disco. 2 1 - 51>0 r*" ■ 



SOLiCITE NUESTRO CATALOGO 



EN VIOS CONTRA REEMBOLSO A TOD A ESP ANA SIN GASTOS. PEDJ- 
DOS INFERIORES A 1 .OQO PTS. ANADIR 200 PARA GASTOS DE ENVIO. 
SOFTWARE DE GESTION V APLICACIONES A ME DID A. 



CIMEX 

ELECTRONICA 



FLORIDABLANCA 54.ENT.3.A 
08015 BARCELONA 
TEL.224 34 22 



program*^ 




La primera viene cuando el nume- 
ro inicial es menor que uno. En este 
caso el desplazamiento de la coma ha- 
cia la izquierda hace que vaya en sen- 
tido contrario de como debiera ir. Por 
lo que habras de dirigirla hacia la de- 
recha. Asf el ordenador sabe donde 
deberia situarse la coma en el numero 
final, sustrayendo uno del exponente 
cada vez que se retrocede. El expo- 
nente comienza, como con los nume- 
ros mayores que 1, con un valor de 
128. 

A menudo, cuando escribes un nu- 
mero binario, se escriben sobre ellos 
los equivalentes decimales de cada 
«columna». Volvemos a remitirnos a 
la conversion binario decimal del artf- 
culo de los GDUs. Luego se suman los 
valores de las columnas que tienen un 
1 y se obtiene el equivalente decimal. 
Son los valores 1,2,4,8,6,32,64..., 
pero recordemos que estos se situan a 
la izquierda de la coma. En el caso de 
que la coma binaria se encuentra a la 
derecha, los valores asociados a cada 
columna son fracciones: 1/2, 1/4, 1/8, 
1/16, 1/32, 1/64... 

La segunda variante con los nume- 
ros en coma flotante se produce cuan- 
do el numero debe ser capaz de alma- 
cenar su propia version del signo me- 
nos de alguna forma, sin utilizar espa- 
cio adicional alguno de la memoria. 

Se vuelve a recurrir al truco de em- 
plear el primer bit para saber si el nu- 



mero es positivo o negative. Simple- 
mente, si es negativo el primer bit de 
la mantisa sera puesto a 0. 



iDONDE ESTA EL NUMERO? 

Con los ejemplos anteriores en 
mente, ahora estas en disposition de 
ser capaz de saber como almacena los 
numeros tu ordenador. 

El numero decimal 58 (111010 en 
binario) es almacenado con los si- 
guientes 5 bytes: 

134 104 

y el numero 10 como: 

132 32 

Haz algunos experimentos, calcu- 
lando los valores decimales de los 
bytes que el ordenador almacena para 
tus numeros. Comprueba tus respues- 
tas copiando y ejecutando el progra- 
ma que sigue: 

HHgH para C-64 y Vic-20 

10 print"Cshift+clr/home:" : 

CLR 

20 PRINT "ESCRIBE UN NUMERO" 

: INPUT X 
30 V=PEEK(45)+PEEK(46)*256 
40 PRINT "EXPONENTE:"; PEEK 

(V+2) 

50 PRINT "MANTISA: "; : FOR N=3 
TO 6 

60 PRINT TAB(10);PEEKCV+N) 
70 NEXT N 
80 END 



El programa siguiente complemen- 
ta al anterior: 

100 REM***SEGUNDO PROGRAMA 
110 PRINT"s":CLR:R=1 :V=PEEK 

(45)+PEEK<46)*256 
120 INPUT"ESCRIBE EL EXPO 

NENTE"; EX 
130 IF EX<0 OR EX>255 THEN 

120 

140 POKE V+2, EX 

150 FOR N^3 TO 6 

160 INPUT "ESCRIBE LA 

MANTISA "; MAN 
170 IF MAN<0 OR MAN>255 THEN 

160 

180 POKE V+N,MAN 
190 NEXT 

200 PRINT "RESULTAD0='*;R 

El primero de los dos programas te 
permite introducir un numero, devol- 
viendo el ordenador los cinco bytes 
utilizados para almacenarlo. 

El segundo trabaja en sentido inver- 
so, introduciendo los 5 bytes se obtie- 
ne el numero que representa. Algunas 
veces la respuesta presentara el forma- 
to exponencial. 



AHORRANDO MEMORIA 



Conociendo la necesidad de los 5 
bytes para cada numero, pronto te 
das cuenta de que a menudo se des- 

INPUT 13 



perdicia memoria al haber numeros 
que no necesitan totalmente los 4 
bytes de la mantisa. Podrian ser aho- 
rrados y tal vez utilizados para algu- 
nas otra cosa. 

En efecto, puedes ahorrar una can- 
tidad significativa de memoria evi- 
tando el uso de cantidad de numeros, 
pero esto no es siempre posible. Sin 
embargo hay otra forma de reducir 
la cantidad de memoria para cada 
uno. 

Se puede evitar en muchos casos el 
uso de numeros, simplemente ^stable- 
ciendo una variable que sea igual al 
valor que deseas utilizar. Naturalmen- 
te que precisas del numero en si para 
definir la variable y esta tambien ne- 
cesita algunos bytes de almacenamien- 
to. Si vas a utilizar ese numero una o 
dos veces, probablemente no merezca 
la pena. 

Una vez que se establece una varia- 
ble, necesitaras solamente un byte 
para cada caracter empleado por ella, 
por lo que si recurres a variables de 
una sola letra, es probable que obten- 
gas un gran ahorro. 

EFECTOS EXTRANOS 

Una vez comprendido todo lo ante- 
rior, podras deducir porque se produ- 
cen a veces cosas raras. Existen impre- 




cisiones de calculo que algunas perso- 
nas tienden a asociar con errores en la 
ROM del ordenador. La razon de que 
aparezcan o desaparezcan cifras apa- 
rentemente de un modo aleatorio, se 
debe a que el ordenador trabaja con 
algun grado de imprecision, y el orde- 
nador tiende a redondear con nume- 
ros que poseen mas de un determina- 
do numero de digitos. Esto depende 
de cuales sean los numeros y cuantos 
calculos subsecuentes se realizan con 
los valores redondeados. Esto puede 
conducir a result ados erroneos en al- 
gunos casos. 



Afortunadamente, los ordenadores 
son suficientemente precisos para la 
mayoria de las aplicaciones que se los 
ocurren. 

Utilizando matrices se pueden al- 
macenar numeros con mas cifras sig- 
nificativas que el maximo de nueve 
que permite el ordenador. La princi- 
pal ventaja consiste en que puedes es- 
cribir una rutina que visualice el nu- 
mero en su forma normal y no con ex- 
ponente. Con este metodo puedes 
tambien solventar el problema de 
mensajes de error tales como «num- 
her too large». 



INFORMACION Y VENTA: 



DELTAS IT 

Colon, 20 
46460 SILLA 
(VALENCIA) 
somwnE.HMnw.itE Tel. (96) 120 29 25 

HIltlHWL 

DISTRIBUIDORES BIENVENIDOS 




FORMA DE PAGO: 

CHEQUE PERSONAL 
CORREO CONTRAREEMBOLSO 
TAJETA VISA/MASTERCARD 




1 1 1 ii ii 1 1 




MMMXa 



CARTUCHO FREEZE FRAME MKill 

EL MEJOR DE LOS METODOS DE BACKUP ES AHORA TODAVIA MEJOR. 
NUEVA VERSION MKIII 
El cartucho le hace BACKUPS de: 

CINTA A DISCO * CINTA A CINTA * DISCO A DISCO * DISCO A CINTA 

FUNCiONA CON: Ordenadores: C-64, C-128 y C-128/D (en modo C-64) - Uni- 
dades de disco: 1541, 1570, 1571 - Datassette: Commodore o compatible. 
Hace el BACKUP: Ocupando el menor espacio de disco o cinta posible. Tam- 
bien de programas MULTIPROGRAMAS. 100% de exito en el BACKUP. Salva 
a disco en modo TURBOSAVE.TURBOLOADY AUTO RUN, oavelocidad Nor- 
ma! (para los que tengan un turbo instaiado en la unidad de disco), y en cinta 
salva a unos 2.400 baudios (TURBOS AVE), TURBO LOAD Y AUTORUN. Es to- 
talmente TRANSPARENTE, lo que implica que no ocupa memoria y que es totalmente compatible con cual- 
quier software. 

IMPORTANTE: Los backups corren INDEPENDIENTEMENTE del cartucho FREEZE FRAME MKII. 

ATENCION: No se deje influenciar por otros medios de BACKUP. El cartucho FREEZE FRAME fue el pri- 
mero en nacer y ha dado lugar a rnuchas imitaciones. Pero sigue siendo el LIDER. De exclusivo uso 
personal. 

GARANTIA: 6 meses. PRECIO: 11.900 ptas. (IMCLUIDO: IVA + Gastos de envio). 

DELTABIT ofrece a sus CUENTES la posibilidad de cambjarles ei MKII por la nueva version MKIII, al precio 
de 4.000 ptas. (IVA + gastos, incluidos). 

INTERFACE COSMOS' THOUG 

Este interface le permite hacer backups de seguridad de CINTA A CINTA de TODO software en soporte 
cassette (de CUALQUIER ordenador personal). 

Funciona con: C-64, C-1 28, C-128/D y dos datassettes Commodore o compatibles (o una datassete y una 
cassette de audio normal). 

1 00% de exito GARANTIZADO en el backup. De exclusivo uso personal. Testigo acustico de volu- 
men regulable. GARANTIA: 12 meses. PRECIO: 4.900 ptas. (INCLUIDO: IVA + Gastos de envio). 
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3ITEIWT. news 



dac Amon 



REPRESENT ACION EN 
ESPANA DE: 



PROVENZA, 385-387 
TEL. (93) 207 24 99* 



TELEX 97791 
08025 BARCELONA 



IMPRESORA PARA SU COMMODORE 



(optima relacion precio/prestaciones) 



-Cabezal 9 agujas 
-Doble operatividad 
-Cinta autoretintada 
-Tampon retintable 
-Ausencia de rodfflo 
-No dobla el papel 
-Elevadores inferiores 
-Admite texto rigido 
-Maximos tipos de escritura 




Modelo SUPER C+, 120 cps, 
NLQ, ASCII y COMMODORE 



• Conexion directa a Commodore 
(cable incl.) Traccion y friccion 



fig, l , 




LA IMPRESORA PARA COMMODORE, ASCII Y PC'S COMPATIBLES 

(Maxima versatilidad/precio ajustado) 

RITEMAN 10-C 

—140 cps, traccion y friccion 
— Paralelo centronies/Commodore serie DIN 
— Tablas ASCII y PC en Rom interna 
— Tabla 100% Commodore y 8K RAM en modulo 
—Interface Commodore exterior incluido 
— RS 232-C opcional 




NOTA: Para Aplicaciones en las que se necesite mas velocidad, o mayor tamano de carro, tambien 
pueden aplicarse nuestros interfaces externos a los modelos RITEMAN 10/11 y RITEMAN 15. 



Commodore es marca registrada de Commodore Business Machine, Inc. 

• Estaremos en S.I.M.O. Pabellbn IX Stand. G. 104. 



CARACTERES GRAFICOS 
INMEDIATOS 



No es preciso conocer el codigo ma- 
quina o ser un experto en el manejo del 
sistema binario para desarrollar grafi- 
cos utilizables en juegos. Con estos sen- 
cillos ejercicios de programacion es po- 
sible realizarlos inmediatamente. 

En tan solo diez minutos es posiblc 
crear caracteres graficos originales 
para emplearlos en el diseno de jue- 
gos propios. Todos los ordenadorcs 
domesticos poseen su propio metodo 
para producir caracteres graficos nue- 
vos o GDUs (Graficos Definidos por 
el Usuario). En el Commodore 64 
existen unos muy especiales, los cono- 
cidos sprites con dimension de 24 x 21 
pixels, que no son el objetivo de este 
artlculo . 

Sin embargo, en muchos cases es 
conveniente partir de sfmbolos cuya 
dimension es de 8 por 8 pixels, gene- 
raimente para los enemigos en un jue- 
go de marcianos. Una vez adquirida 
cierta experiencia es sencillo crear 
imagenes graficas de mayores dimen- 
siones, uniendo varios sfmbolos para 
ere arias. 



EL DISENO EN BINARIO 

Como es sabido, los ordenadorcs 
memorizan toda la informacion en for 
mato binario (o sea en base 2). Aun- 
que no es preciso conocer el manejo 
del sistema binario para transformar 
los caracteres formados sobre papel 
cuadriculado en una serie de unos y 
ceros. Todo lo que conviene saber es: 

1 . - Cada vez que se quiere iluminar 
un punto (pixel) se le asocia un 1. 

2. - Cuando el punto no debe apare- 
cer se emplea un 0. Si se dibuja, por 
ejemplo, la cruz de Lorena mostrada 
mas adelante, la primera ffnea consis- 
te en tres espacios, un punto y otros 
cuatro espacios. Esto en binario es 
00010000. La segunda lmea se compo- 
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ne de dos espacios, tres puntos y tres 
espacios: 00111000. La imagen com- 
pleta se rcpresenta asf: 
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El program a de este artlculo se en- 
carga de todas las operaciones a par- 
tir de la informacion de unos y ceros. 



PASO DE BINARIO A DECIMAL 



El camino mas corto para convcrtir 
los numeros binarios en decimales 
consiste en recurrir a una tabla de 8 
columnas y nueve filas. Cada colum- 
na Ileva asociado un valor, potencia de 
2 (elevado a su position): 128, 64, 32, 
16, 8, 4, 2, 1. El resto de las lrneas se 
Ilenan con las series de valores bina- 
rios asociado s a la imagen a formar. 
Siguiendo con el ejemplo de la cruz de 
Lorena: 
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Para realizar la conversion, se igno- 
ran todos los ceros. En cada fila hori- 
zontal se suman los valores asociados 
a cada columna en la que exista un 
uno presente. En el ejemplo, la pri- 
mera fila arroja un valor de 16, la se- 
gunda es de 56 (32+16+8). 





Realizando las operaciones en todas 
las filas obtenemos una serie de 8 va- 
lores, que podrian anadirse en uns 
sentencia DATA de la siguiente apa- 
riencia: 

1 

DATA 1 6,56; 16,124, 16, 16, 16,0 / 



Inicialmente puede parecer un me 
todo algo incomodo, pero resulta, sii 
embargo, bastante rapido. Por otrt 
lado hay muchas combinaciones recu 
rrentes, tales como 11111111 (255 ei 
decimal), que resultan faciles de re 
cordar. 
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PROGRAMA PARA C-64 




BINARIO A HEXADECIMAL 

La conversion de binario a hexade- 
cimal es bastante facil. Con la ayuda 
de la siguiente tabla se realiza sin ma- 
yores complicaciones: 



Bi nario 



Hexadeci ma L 



0000, 
0001 , 
0010, 
0011 , 
0100. 



0101 

0110 

0111 

1000, 

1001 , 

1010, 

1011 , 

1100. 

1101 . 

1110. 

1111 . 



En este caso no pueden ser ignora- 
dos los ceros. Lo primero que debe- 



mos hacer es agrupar los 8 bytes en 2 
conjuntos de 4 bits {nybble). A conti- 
nuation se busca en la tabla el equi- 
valente hexadecimal del numero bina- 
rio de cuatro cifras. Se anota y vuelve 
a repetirse la operation. El numero 
obtenido por este procedimiento sera 
el correspondiente hexadecimal del bi- 
nario propuesto. Si volvemos al ejem- 
plo de la cruz de Lorena, la primera 
fila es: 0001 0000 = $10 (el signo $ sue- 
le utilizarse para denotar el caracter 
hexadecimal). La segunda h'nea es: 
0011 1000 = $38, etc. - 

Repitiendo el proceso nos encontra- 
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mos con una scrie tie niimcros; 
10,38, 10,7C, 10, 10,10,00. 

JYaturafmente que es posibfe escri- 
bir un programa que haga estas ope- 
raciones automaticamente, pero ese 
no es el fin del articulo, 




APLICACION CON GRETA 



Realmente en el Commodore 64 se 
utilizan los caraeteres graficos menos 
frecuentemente que los versatiles spri- 
tes, pero conviene saber definir GDUs 
de 8 por 8 pixels como un recurso de 
gran utilidad. En particular es posible 
redefinir total o parcialmente el juego 
de caraeteres originalmente utilizados 
por el 64. Por poner un ejemplo pro- 
ximo, es factible definir las letras mi- 
tt usculas aeentuadas, que no existen 
en el repertorio del ordenador. En el 
ejemplo disenaremos una e acentua- 
da, que siguiendo el dibujo sobre pa- 
pel cuadriculado, arroja los siguientes 
valores: 



Bi nari o 



Hex . 



Deci ma L 



00010000. 10.... 16 

00001000 08 ...8 

00111100 3C 60 

01100110. ....66 102 

01111110 7E . 126 

01100000. ....60 96 

00111100 3C 60 

00000000 00 - - - -0 



El esquema decimal es el que ofre- 
ce un uso mas inmediato y facil de cal- 
cular. Sin embargo no descartamos 
que puedan emplcarse los binarios y 
hexadecimal. 

Procedamos a incluir esta letra en 
nuevo juego de caraeteres. 

TecLea para C-64 

10 A=1 2 :Z=A*1 024/256 

20 POKE 53272, (PEEKC53272) 




AND 240)OR A 
30 POKE 52,Z:P0KE 56,Z:CLR 
:A=12 



40 POKE 56334, PEEKC56334) 

AND 254 
5G POKE 1 ,PEEK(1) AM0 Z51 
60 FOR J=0 TO 56832-53248 
70 POKE A*1024+J,PEEK(53248+ 

J) 

80 NEXT J 

90 POKE 1,PEEK(1)0R 4 
100 POKE 56334, PEEKC56334) 
OR 1 

110 SC=5:Z=1 024*12: FOR J=Z+ 
(SC*8) TO Z+(SC*8)+7: 
READ A$ 

120 N=0:F0R T=1 TO LEN(A$) 

130 IF MXD$CA$,T,1)="1 " THEN 
N=N+2 A CLENCA$)-T) 

140 NEXT: POKE J,N:NEXT J 

500 DATA 0001,0000 

510 DATA OOOOiOOO 

520 DATA 00111100 

530 DATA 01100110 

540 DATA 01111110 

550 DATA 01100000 

560 DATA 00111100 

570 DATA 00000000 

Una vez que se ejecuta el progra- 
ma, no sucedera nada durante aproxi- 
madamente un minuto, pero cuando 
aparece el mensaje READY las letras 
E apareceran sustituidas por el nuevo 



□ 
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caraeter. Lo misnio ocurre al presio- 
nar la tecla correspondiente a la letra. 
Si presionamos las teclas Commodore 
y SHIFT las E perderan su acento al 
pasar al segundo juego de caracteres 
del 64. 




Para crear cualquier otro simbolo 
grafico asociado a la E, no hay mas 
que alterar las series de unos y ceros 
en las lmeas con DATA. 

Si cambiamos el valor de la variable 
SC en la lfnea 110, sera otro el carae- 
ter redefinido. Por ejemplo, un valor 
de 6 cambiara la F, el 7 la G, etc. En 
tal caso, convendra escribir, GOTO 
110, en lugar de RUN, que repetiria 
el lento proceso de copia del juego de 
caracteres desde la ROM a la RAM 
que ocupa las mismas direcciones de 
memoria. 



DESCRIPCiON DEL PROGRAMA 



La information referente a los ca- 
racteres normales esta almacenada en 
memoria ROM y por tanto no puede 
ser alterada. Sin embargo, la tecnica 
descrita se basa en copiar esta infor- 
macion en memoria RAM, sea total o 
parcialmente. De esta manera ya es 
facil manipular los bytes que definen 
el aspecto de las letras, simbolos y de- 
mas caracteres graficos. 
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La primera operation que acomete 
el programa consiste en asignar una 
cantidad de RAM suficiente para con- 
tener al nuevo conjunto de caracteres. 
El valor de A en las Irneas 10 y 30, per- 
mite definir el area de memoria a uti- 
lizar. Se puede utilizar cualquier valor 
entero comprendido entre 4 y 16. En 
el programa se ha utilizado 12, que 
apunta hacia la memoria de caracteres 
en 12288 (o lo que es igual 12*1024). 



Un valor de 4 situ aria el puntero en la 
direccion 4096 (4*1024). 

La lmea 30 ajusta dos punteros, el 
final del area destinada al BASIC y el 
inicio del area de cadenas. Con esto 
se consigue que el nuevo conjunto de 
caracteres no se superponga a los pro- 
gramas en BASIC deteriorandolos. 

En la linea 40 se desactiva la llama- 
da «interrupcion para exploracion del 
teclado». La lmea 50 selecciona la 
ROM de caracteres. 

La rutina de copia desde la ROM a 
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la RAM interviene en las lineas 60,70 
y 80. Los numeros 53248 y 56832 se re- 
fieren al comienzo y final de los gru- 
pos de ocho bloques de caracteres que 
se copian en la RAM. El programa 
realiza asi una copia integral, cam- 
biando el arco de valores atribuido 
a J. 

Una vez completa la copia, se de- 
sactiva el generador de caracteres de 
la ROM (linea 90), al tiempo que se 
reactiva la exploracion del teclado (li- 
nea 100). 

Las Kneas 110 a 140 cambian la de- 
finition de un caracter dado (el SC), 
leyendo la serie de valores contenidos 
en las sentencias DATA (lineas 500 a 
580), convirtiendolos en valores deci- 
mals (lineas 120 y 130). 




Para ahorrar espacio, las lineas 
DATA pueden ser sustituidas por una 

sola: 

500 DATA 00010000,00001000, 
00111100,01100110,01111 
110,01100000,00111100, 
00000000 

Es notable el ahorro, pero este for- 
mato no permite evaluar facilmente el 
aspecto que tendra el caracter ni co- 
rregirlo sobre la marcha. 




Si se prefiere irabajar en hexadeci- 
mal, habra que realizar la siguiente 
modificacion: 

130 M=ASCCMID$(A$,T,1))-48: 
N=(M+(M>9)*7)*16 A (LEN 
CA$)-T)+N 

500 DATA 10,08,3C,66,7E / 60, 
3C,00 
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ESTRENO MUNDIAL 



THE FINAL CARTRIDGE 2 

EL PRIMER SISTEMA OPERATIVO EXTERNO 
PARA EL CBM 64 

AHORA, CON FREEZER COMPLETO 

{Puede cargar sus backups sin el cartucho) 

Este sistema operative construido en un cartucho no utiliza memo- 
ria alguna y esta siempre presente. Compatible con 99% 

de los programas. 



INCORPORA 



SUPER FREEZER 



TURBO DISCO; Carga 6 veces mas 
rapido -salva 6 veces mas rapido - No 
Borra la pantalla 

TURBO CINTA: 10 veces mas rapido, 
inclyso con ficheros. Utiliza los coman- 
do^rtormales del Commodore (Load- 
Save- In pLlt7T,...) 

INTERFACE CENTRONICS: Permite uti- 
lizar las impresoras de tipo paralelo. 
Imprime los graficos Commodore y los 
codigos de control. 
(Importante para los listados). 

VOLCADOS DE PANTALLA: De alta 
revolution y texto. 1 pagina de ancho. 
12 tonos grises, copia pantallas de jue- 
gos o de programas como Doodle, 
Koala Pad, Print Shop, etc. Busca auto- 
maticamente la direccion en memoria. 

Funciona con impresoras Commo- 
dore y Centronics. 

24 K. MAS DESDE EL BASIC: 2 nuevps 
comandos, "memory write" y "memory 
read" mueven 192 bytes muy rapida- 
mente en cualquier sitio de los 64 RAM 
del CBM 64, Se pueden usar con cade- 
nas variables. 

COMANDOS DEL BASIC 4.0: Como 
dload, dsave, dappend, catalog, etc. 

TECLAS DE FUNCION TELEPROGRA- 

MADAS: Run, load, save, catalog, 
comandos de disco, list (quita las pro- 
tecciones contra el listado de los pro- 
gramas en BASIC). 

MONITOR DE CODIGO 

Scroll hacia arriba y abajo. 
Bankswitching (para leer 
debajo de las ROOMS), etc 
en memoria. Se puede llamar en cua 
quier momento con cualquier programa 
en memoria. 

RESET: Resetea todos los programas. 

TRAINING MODE: Para cancelar la 
deteccion de coiision de sprites 
podras ir hasta el final de los juegos 
sin que te maten los bichos malos. 



MAQUINA: 



y escribir 
No reside 





Ejemplo de volcado de pantalla. 



i Hasta el precio 

es increi'ble! 




Pulsandq el boton del FREEZER, to- 
mara el control de su ordenador, "con- 
gelando" el programa en memoria. Con 
la ayuda de un menu muy comodo 
podra: 

— Hacer VOLCADOS DE PANTALLA, 
aita o baja resolucion (por ejemplo las 
pantallas de sus juegos preferidos). 
Podra "congelar" cualquier programa 
en el momento que desee, y volcar la 
pantalla sobre el papel. 

—Hacer COPIAS DE SEGURIDAD de 
sus programas. El FREEZER le permi- 
tira, con programas protegidos o no, 
cualquiera que sea el sistema de carga 
utilizado (turbo, verification de errores, 
entre pistas...). 

• Hacer copias de cinta a cinta 
■ Hacer copias de cinta a disco 

• Hacer copias de disco a cinta 

• Hacer copias de disco a disco 
solo pulsando una tecla. El proceso de 
copia es totalmente automatico, y no 
necesita tener ningun conocimiento de 
programacion. La copia facilitada por el 
FREEZER consta solo de dos partes (un 
cargador y e! programa , propiamente 
dicho) y se puede cargar. 
INDEPENDIENTEMENTE DEL CAR- 
TUCHO (a velocidad turbo), EL 
FREEZER de THE FINAL CARTRID- 
GE 2 es mas comodo y mas rapido 
que los productos especializados 
ingleses o americanos probados has- 
ta ahora. 



ATENCION: Las copias consegui- 
das con THE FINAL CARTRIGE 2 
son exclusivarnente para uso pro- 
pio. 



NO EXISTE NINGUN PRODUCT0 
COMPARABLE PARA SU C64: Encon- 
trara quizas algun FREEZER (con otro 
nombre) ingles o americano, pero ade- 
mas de ser mas caro sera solo jn 
FREEZER. 

THE FINAL CARTRIDGE 2 da mucho 
mas, por menos. 



DISPONIBLE EN LAS MEJORES TIENDAS O DIRECTAMENTE POR CORREO O TELEFONO 



r 



Condiciones 
especiales para 
distribuidores 



0) HSBI50FT.SA 

C COSO 87-6 A-Telf f 976) 39 99 61 -50001 2ARAGOZA 



C3Dyngf>i and registered jrademark HSP compuiers 
Wolphaefisbochi 236 3083 MV Raiierdam Ntiheilands Tel 



01031 10231982 Tele* 2.6401 



Aplieaciones 



EL PROCESAMIENTO 
DE TEXTOS 



Si quieres poner a punto tu habili- 
dad mecanogratica a expensas de un 
procesador de textos hecho y derecho, 
la respuesta la tienes en este editor de 
textos de facil programacion. 

Ya conoces las ventajas del proce- 
sado de textos. Realmente esta es una 
de las aplieaciones mas utiles de los or- 
denadores domesticos. Para conseguir 
los me j ores resultados, puedes com- 
prarte el software existente en codigo 
maquina, pero normalmente esta dise- 
nado para usos profesionales y puede 
resultar muy caro. 

La parte de programa que presen- 
tamos en este arti'culo presenta un 
buen editor de textos para quien da 
sus primeros pasos en este terreno, 
permitiendole adquirir una sensacion 
real de como son los program as de 
este tipo. 

Con este programa puedes crear in- 
formes, cartas o cualquier otra forma 
de correspondencia. Naturalmente la 
salida se hace a traves de la impreso- 
ra. El texto puede ser almacenado en 
cinta o disco y puede recuperarse para 
su posterior utilizacion, ya sea por este 
programa o cualquier otro que haga 
uso de los ficheros secuenciales crea- 
dos con los datos. 

Debido a la longitud del programa 
completo — no menos de 7,5K — el 
programa se ha fraccionado en dos 
unidades para hacer mas facil su diges- 
tion, y no funrionara adecuadamente 
hasta que se haya introducido la ulti- 
ma parte. Sin embargo, despues de in- 
troducir la primera parte ya estaras en 
condiciones de crear ficheros de tex- 
to. La segunda parte contiene la ruti- 
na de impresora, que evidentemente 
necesitaras para obtener copias de tus 
escritos. Tambien se incluyen unas fa- 
cilidades de ordenacion y busqueda, 
asf como una opcion para hacer mo- 
delos de cartas. 

La extension del programa hace que 
no pueda ejecutarse con el Vic 20 sin 

22 INPUT 



ampliacion de memoria. Debido a 
esto, y a que la pantalla del Vic solo 
presentana una pequena cantidad de 
texto, no inciuiremos la version para 
el Vic. 

Antes de introducir la primera par- 
te del programa, echemos una ojeada 
a la forma en que se utiliza. Se ha con- 
figurado de una forma que resulte de 
uso comodo en la mayoria de las apli- 
eaciones domesticas, pero como ocu- 
rre con todo programa de este tipo 
puedes modificar el contenido de los 
diversos menus y mensajes de panta- 
lla para que se adapten a tus necesi- 
dades o a tus preferencias. No obstan- 
te, si decides realizar dicha modifica- 
cion, deberas respetar las mismas con- 
venciones de numeracion de Kneas 
para que el programa se enlace correc- 
tamente con otros inodulos, especial- 
mente cuando se le ahadan otros mo- 
dules. 



EL MENU PRINCIPAL 



En cuanto ejecutes (con RUN) la 
version completa de la copia del pro- 
grama, te aparecera un mensaje en 
pantalla invitandote a seleccionar las 
opciones de enfrada y salida. Con ellas 
el si stem a queda configurado para uti- 
lizar cinta o disco, lo cual se hace te- 
cleando C 6 D. 

Observa como puedes utilizar un 
dispositivo de entrada y otro distinto 
de salida, y cambiar despues dichos 
dispositivos cuando quieras. 

Seguidamente te aparecera el menu 
general. 

[S]AVE (Guardar) 

[CjLEAR (Borrar) 



LOAD 



Si quieres seguir trabajando sobre 
un fichero de texto ya existente, que 



■ NOMBRES DE FICHEROS 



■ 


EDICION 


■ 


AJUSTE DE C0L0RES 


■ 


PARAMETROS DE ENTRADA Y SALIDA 


■ 


MANIPULACION DEL TEXTO 



anteriormente hablas guardado (con 
el comando SAVE), pulsa L para 
arrancar la rutina de carga. Como el 
texto se va a escribir sobre cualquier 
texto que tengas en memoria, el pro- 
grama te enviara un mensaje de «Es- 
tas seguro?». Para continuar, pulsa Y: 
si quieres abortar el proceso, pulsa 
cualquier otra tecla. Seguidamente te 
pedira el nombre de un fichero y ten- 
dras que proporcionarselo para que el 
proceso continue. El fichero de textc 
cuyo nombre hay as tecleado, sera car- 
gado en la memoria y ya puedes tra- 





SAVE 



La rutina SAVE se utiliza para la 
creation de ficheros secuenciales para 
almacenamiento de datos. Cuando se- 
lecciones esta opcion pulsando la tecla 
S, lo primero que te pedira el progra- 
ma es un nombre de fichero. No se 
aceptara una entrada nula. El sistema 
ya «sabe» el dispositivo que estas uti- 
lizando y continua enviandote mensa- 
jes en consecuencia, acerca de la pre- 
paration de la cinta o la unidad de dis- 
co. Por ultimo, pulsa |return| para 
que se efectue la operation de almace- 
namiento. 

Para almacenar los ficheros en dis- 
co, tendras que utilizar el procedi- 
miento de escribir «@0:nombre» ex- 
cepto en los casos en que no importe 
que el fichero de texto se escriba so- 
bre el ultimo con el que trabajaste. 



Se pueden anadir otras rutinas adi- 
cionales de SAVE que permitan la 
protection de los ficheros, el cambio 
de nombre o su sustitucion. En el lis- 
tado que presentaremos en nuestro 
proximo articulo podras examinar va- 
rias rutinas de muestra. 



ENTRADA/SALIDA 



Si por cualquier razon decides mo- 
dificar los parametros iniciales de en- 
trada/salida, puedes hacerlo en cual- 
quier momento seleccionando la op- 
cion I en el menu principal. Teclea tu 
election y automaticamente se selec- 
cionara el programa para la nueva 
configuration. 



MODO DE EDICION 

Si selcceionas B en el menu princi- 
pal, entras en el modo de edition y te 
aparecera un menu secundario. 



Puedes seleccionar una de las pri- 
meras opciones para trasladarte al 
principio o al final del texto que tie- 
nes en memoria. Si utilizas la tercera 
opcion, puedes volver a la ultima linea 
editada o salir al menu principal. 

Con la opcion COLOR puedes 
ajustar a tu gusto la «tinta», el «papel» 
y el borde de pantalla. 

Cada una de las tres primeras op- 
ciones te situa en un modo de entra- 
da. La pantalla presenta las lmeas del 
principio o el final del texto (sok) pue- 
de presentar a un tiempo una de las 
dos cosas si ya tienes algo en memo- 
ria). Cerca de la parte inferior de la 
pantalla hay una «zona de trabajo» se- 
parada. 

El texto introducido en la zona in- 
ferior se transfiere a la memoria y a la 
zona de pantalla cuando se pulsa |RE- 
turn| , o de forma automatics cuan- 
do se han completado dos Hneas de 
pantalla. 

El programa lleva incorporadas va- 
rias utilidades de edition. Toda la la- 
bor de edition e introduction tiene lu- 
gar en la zona de trabajo. 

Los controles de edition te per mi - 
ten desplazarte hacia adelante y hacia 
atras a lo largo de la linea de texto del 
area de trabajo para insertar o supri- 
mir caracteres antes de que el texto 
sea transferido a la memoria. 

En otras palabras, el texto que ya 
esta en memoria, representado en la 
parte alta de la pantalla, tiene que ser 
copiado linea a linea a la zona de tra- 
bajo para poder trabajar sobre el. 

Puedes introducir nucvas lmeas en 
cualquier parte del cuerpo principal 
del texto. Para hacerlo, pulsa la tecla 
adecuada del modo «editor» (consults 
las instrucciones detalladas) y coloca 
la marca debajo del punto donde quie- 
ras insertar la nueva linea. 

Tambien puedes suprimir texto li- 
nea a linea entrando en el modo edi- 
tor y colocando nuevamente la marca 
debajo de la linea que quieras borrar 
antes de pulsar la tecla adecuada de 
borrado. 

Las teclas de control te permiten 
saltar hacia adelante o hacia atras en 
el texto que tienes en memoria, de 
diez en diez lineas. 
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/Vplicaciones 



Para volver al menu del modo edi- 
tor, pulsa la tecla de escape adecua- 
da y desde allf al menu principal para 
modificar cualquiera de los parame- 
tros del sistema. 



BORRADO 



Otra de las funciones disponibles en 
el menu principal es el borrado de la 
memoria, pero solo despues de que 
hayas respondido «si» al mensaje «Es- 
tas seguro?» que te aparecera en pan- 
talla en cuanto pulses la tecla B. Ten 
en cuenta que esta option no iniciali- 
za los parametros de entrada/salida ni 
la impresora. Si quieres arrancar de 
nuevo desde cero, pulsa F para salir 
totalmente del programa, con lo que 
se produce una initialization comple- 
ta del sistema al ordenador al BASIC. 

Cuando hayas tecleado la parte de 
programa que figura al final del artl- 
culo, podras hacer pleno uso de las fa- 
cilidades de edicion que dicho progra- 
ma te ofrece. Pero recuerda que no 
podras imprimir ningun texto hasta 
que hayas introducido la ultima parte 
del programa, que publicaremos en el 
siguiente capftulo de esta breve serie. 

Como el arte de escribir cartas se ha 
convertido en una cosa del pasado, en- 
contraras que las facilidades de edi- 
cion que ofrece el editor de textos re- 
sultan de gran ayuda a muchos nive- 
les. En el nivel mas sencillo, puedes 
hacer correcciones ortograficas des- 
plazando tu plumilla electronica — el 
cursor — a la palabra equivocada, y su- 
primiendo o insert and o los caracteres 
adecuados. 

Si las faltas de ortografia no son un 
problema para ti, pero en cambio te 
parece problematica la redaction de 
un texto, especialmente si se trata de 
una carta importante, tal como una 
instancia para solicitar un empleo o 
una carta al director de tu banco para 
explicarle las razones por las que inad- 
vertidamente has incurrido en un des- 
cubierto de tu cuenta corriente, en tal 
caso este programa te resultara ideal. 
Al escribir una carta, puede ser que 
termines por gastar una gran cantidad 
de hojas en tu esfuerzo por encontr 
las palabras adecuadas; normainiente 
las primeras frases suelen ser las que 



mas dificultades presentan. Si realizas 
la composicion directamente sobre el 
teclado de tu ordenador, mantendras 
tu papelera vacia y tu humor intacto. 
En vez de pasar penas esforzandote en 
encontrar la forma correcta de empe- 
zar, puedes Hmitarte simplemente a 
hacer un borrador de tu carta. Des- 
pues puedes analizar lo que has escri- 
to, examinando el texto hacia arriba y 
hacia abajo. Una vez que hayas deci- 
dido lo que tienes que corregir o su- 
primir puedes borrar e insertar pala- 
bras o frases hasta que finalmente lle- 
gues a tener una composicion perfec- 
ta. 

Una ventaja adicional de componer 
directamente en pantalla es que pue- 
des archivar la carta para usarla otra 
vez, o simplemente para tener una co- 
pia de lo que en ella decias. 

Las utilidades contenidas dentro de 
este programa son analogas, aunque 
bastante menos sofisticadas, a las de 



las modernas maquinas de fotocompo- 
sicion que se utilizan para la produc- 
tion de publicaciones como INPUT. Si 
conoces los metodos de composicion 
utilizados antes de que se inventara la 
maquina de fotocomposicion, te resul- 
tara facil apreciar las ventajas que te 
ofrece un'paquete de utilidades de 
este tipo. 

El procedimiento de utilization de 
este programa sigue las lfneas genera- 
tes anteriormente citadas. Las utilida- 
des de edicion en pantalla que trae el 
Commodore 64 son muy eficaces y se 
conservan en este editor de textos. 
Pero cuando pases al modo de edi- 
cion, los controles de edicion pasar an 
en gran parte a las teclas de funciones, 
algunas de las cuales se utilizan para 
las funciones extra asociadas con la ru- 
tina de impresora. 

La creation y modification de texto 
tiene lugar en el area de trabajo pro- 




ximo al fondo de la pantalla. En la 
parte superior de la pantalla se visua- 
liza el texto que permanece almacena- 
do en la memoria. El borrado e inser- 
tion de texto se hace de la forma acos- 
tumbrada utilizando las teclas 

I SHIFT I O 



llNSTl 



DEL i 



despues de situar el 
a iz- 



cursor con las teclas de ] CRSR I 
quierda y derecha. La escritura se pro- 
ducira sobre los caracteres ya existen- 
tes a menos que utilices el modo de in- 
sertion, pulsando la tecla [f5\ . 

El almacenamiento del texto en la 
memoria y su presentation en la parte 
superior de la pantalla se produce pul- 
sando la tecla I RETURN I . En cual- 
quier momento puedes acceder a di- 
cho texto introduciendo el modo «edi- 
tor» mediante pulsation de la tecla 
|fT] . La marca * indica el punto de 
texto a que tienes acceso en cada mo- 
mento. Para transferir al area de tra- 
bajo la linea de texto que esta encima 




de la marca, pulsa la tecla £3 ; a con- 
tinuation ya puedes editar de la forma 
acostumbrada. 

Para borrar una line a de texto que 
este almacenada en la memoria, pasa 
al modo editor, situa la marca inme- 
diatamente por encima de la Irnea que 
quieres suprimir y pulsa la tecla 
| inst/del] . Si quieres tener una line a 
en bianco, pulsa simultaneamente 
| inst 1 y I shift I , o bien pulsa 



RE- 
TURN | sin introducir texto alguno en 
la zona de trabajo. 

En el modo de edition, puedes vi- 
sualizar el contenido de la memoria 
pulsando [ft] , seguido de ICRSR l arri- 
ba o abajo con o sin 1 SHIFT | para mo- 
verte en una u otra direction desde la 
position de la marca a la que siempre 
vuelve el modo editor. 

Puedes saltar hacia arriba de cinco 
en cinco lfneas pulsando la tecla de fle- 
cha hacia arriba, o hacia abajo de cin- 
co en cinco lfneas, con la tecla de des- 
plazamiento hacia la izquierda. 

Para salir de los modos editor o de 
introduction (sucesivamente), pulsa 
J f7 [ . El texto que esta almacenado en 
la memoria no se vera afectado por 
ello. 

■ reraBM para Commodore-64 

1 REM**C]SIGNIFICA ESPACIO 

2 REM**ESTE TRATAMIENTO DE 
TEXTO NO TIENE COMO 

3 REM**0BJETIVO SUSTITUIR A 
PROGRAMAS COMERCIALES 

10 print"Cshift+clr/home] 

cctrl+8]";chr$(8) 
20 poke 53280,6; poke 53281,0 
30 dimtx$(501):0w=0:em=0: 

DN=4 

35 GC$="CCLR/H0ME] 

[23*CRSR abajo] " 
40 BL$=CHR$(160) :TL=1 :CP=1 : 

MW=80 : TW==60 : PL=60 : TH=40 : 

GP=10:LF$=CHR$(13)+ 

CHR$<13) 
42 LF$=LF$+CHR$(13) :G0SUB 

5000 

50 TX$(0)="CCTRL+4]tCTRL+9]" 
:SW$="":F0R F=0T039:TX$ 
C0)=TX$C0)+"+":SW$=SW$+ 
"CC0MM+YH " :NEXTF 

55 FOR Z=1 TO 40:SP$=SP$+" " 
:NEXT 



60 TX$C0)=TX$(0)+"CCTRL+0] 
CCTRL+8]":TX$(1)="CCTRL+9] 
CCTRL+4]C9*C0MM+a] . 
C9*C0MM+a] . C9*C0MPI+a] . 
C9*C0MM+a].CCTRL+0] 
CCTRL+8] " 

70 PRINTCHR$(142) 

71 PRINT"CSHIFT+CLR/H0ME] 
CCRSR abajo] CCTRL+9] "TAB 
(15);"CCTRL+4]MENU PRIN 
CIPALCCTRL+8]":PRINT 
"C2*CRSR abajo]";TAB(14); 
"CCTRL+9]LCCTRL+0]OAD 
CCRSR abajo]" 

72 PRINTTAB(14)"CCTRL+9]S 
CCTRL+0]AVECCRSR abajo]": 
PRINTTABC1 4) "CCTRL+9] C 
CCTRL+0]AMBI0 E/S 

CCRSR abajo]" 

80 PRINTTABC1 4) "CCTRL+9]E 
CCTRL+0]DITARCCRSR abajo]" 
:PRINTTAB(14)"CCTRL+9]B 
CCTRL+0]0RRAR MEMORIA 
CCRSR abajo]" 

81 PRINTTAB(14)"CCTRL+9]I 
CCTRL+0]MPRIMIR 
CCRSR abajo]" 

82 PRINTTAB(14)"CCTRL+9]A 
CCTRL+Q]LTERAR IMPRES0RA 
CCRSR abajo]": PRINT 
TAB(14)"CCTRL+9]FCCTRL+0] 
IN DEL PR0GRAMA 

CCRSR abajo]" 
85 PRINTTABC12) "CCRSR abajo] 
CCTRL+9] CCTRL+4H] □ 
SELECCI0NA UNA 0PCIONC]C] 
CCTRL+8]" 
90 GET B$: IFB$=""THEN 90 
100 B=0:F0RF=1T08:IF B$=MID$ 
( "LSCEBIAF",F,1 ) THEN B=F 
102 NEXT F:IF B=0 THEN 90 
110 ON B 60SUB 4500,4000, 

5000,1000,160,3000,5500, 
130 
120 GOTO 70 
130 PRINT QD$;TAB(15); 

"CCRSR arriba] CCTRL+9] 
CCTRL+4]ESTAS SEGUR0 
(S/N)?" 

140 GET R$:IF R$<>"S"AND R$ 

<>"N n THEN 140 
150 IF R$="S"THEN PRINT 

"CSHIFT+CLR/HOME]": END 
155 RETURN 

160 PRINT"CSHIFT+CLR/H0ME1 



170 

180 
190 
195 



1000 



1001 



CCRSR abajolCCTRL+93"; 
TAB(13);"CCTRL+4DB0RRAR 
MEM0RIACCTRL+83 " : PRINT 
TABdOV'CCRSR abajoll 
CCRSR abajoJESTAS SEGURO 
CS/N)?*' 

GET B$:IF B$<>"S" AND B$ 
<>"N" THEN 170 
IF B$= M N" THEN RETURN 
IF TL"1 THEN RETURN 
FOR K=1 TO TL-1 :TX$(K)= 
M ":NEXT:TX$C1)=TX$(TL) : 
TX$=" M : TL=1 : CP=1 : RETURN 
PRINT CHRSC14) 
"CSHIFT+CLR/HOME] 
CCTRL+N] CCRSR aba jo] 
CCTRL+9D";TAB(15); M 

cctrl+4Kshift+e]ditar 
cshift+t]extocctrl+8] m 

PRINT"CCRSR abajo] 
CCRSR abaj oil "TABC1 4) ; 
"CCTRL+93 CSHIFT+C] 
CCTRL+0DOMIENZ0 DEL 
TEXTO" 
1002 PRINT TABC1 4) ; " 

CCRSR aba joJCCTRL+9] 
CSHIFT+F] CCTRL+0] INAL 
DEL TEXT0":PRINTTAB(14) 
"CCRSR abajo] CCTRL+9] 
CSH I FT+S] CCTRL+0] I GUI 
ENTE LINEA DE TEXTO" 
PRINT TABC14) " 
CCRSR abajo] CCTRL+9] 
CSHIFT+M]CCTRL+0]ENU 
PRINCIPAL" 
GETB$: IF B$=""THEN 
1010 

B=0:F0RF=1T04:IF B$= 
MID$("CFSM",F,1)THEN 
B=F:G0T0 1030 
NEXT F:G0T0 1010 

ON B GOTO 1050,1060, 
1070,1080 

IF TL=<3 OR CP=1 THEN 
1070 

CP=1 :G0T0 1070 
CP=TL 

PRINT M CSHIFT+CLR/ HOMED" 
:G0SUB 2090:G0SUB 1500: 
GOTO 1000 
RETURN 
A$=" ":P=0 
IF EM=1 THEN 2500 
POKE 198,0 



1004 



1010 
1020 

1022 
1030 

1040 

1050 
1060 
1070 



1080 
1500 
1505 
1510 



1520 CH=PEEK(1 904+P) :GET T$ 1561 

1521 IF LEN(A$)=81 OR T$= 
CHR$C13)THEN GOSUB 2000 
:G0T0 1515 1562 

1522 CH=( CH+1 28) AND 255: POKE 
1904+P,CH:CH=(CH+128) 

AND 255 : POKE 1 904+P, CH 1563 
1530 IFT$=""0R T$=CHR$(34) 

THEN 1520 1564 
1540 IF T$="CCRSR arriba]" 

OR T$="CCRSR abajo]" 

THEN 1520 1565 

1550 IF P<LEN(A$)-1 AND T$= 
CHR$(10) THEN A$-LEFT$ 
(A$,P)+MID$(A$,P+2): 1567 
GOTO 1600 

1551 IF T$=CHR$(10) THEN 1570 
1520 1572 

1555 IF T$=CHR$(136) THEN 

RETURN 1575 
1560 IF T$=CHR$(134) AND CP 

=1 THEN 1520 



IF T$=CHR$(134) THEN 
A$=TX$(CP-1)+" ' , :T$= ,I * , : 
P=0:G0SUB2090:G0T0 1510 
IF T$=CHR$(135) THEN OW 
=ABS(1-0W) :G0SUB 2090: 
GOTO 1510 

IF T$="CCLR/H0ME] M THEN 
CP=1 : GOSUB 2090 
IF T$=CHR$C133) THEN EM 
-1 :PM=CP:GOSUB 2090: 
GOTO 1505 

IF T$="CSHIFT+CLR/HOME] 
" THEN GOSUB 2090: GOTO 
1500 

IF T$OCHR$(20) THEN 
1580 

IF P=0 THEN 1510 
A$=LEFT$C A$,P-1 >+MID$ 
CA$,P+1) :P=P-1 
PRINT LEFT$(GC$,23); : 
FOR F=1 TO LEN(A$)-2: 
PRINT "CCRSR dcha.3";: 



1515 PRINT LEFT$(GC$,23) A$; 




26 INPUT 



Ap |icaciones 



NEXT 

1577 PRINT"C:n M :G0TO 1510 
1580 KJ=0:IF T$=CHR$(148) 

THEN T$=" ":KJ=1 
1582 IF T$OCHR$<157) AND 

T$OCHR$(29)AND ASC(T$) 

<32 THEN 1510 

1590 IF T$=CHR$(29) OR T$= 
CHRSC1 57) THEN 1610 

1591 IF 0U=1 AND J<>1 THEN 
1595 

1593 A$=LEFT$(A$,P)+T$+MID$ 
(A$,P+1) :P=P+1 :GOTO 
1600 

1595 B$=A$:A$=LEFT$(A$,P)+T$ 

+MID$(A$,P+2) 
1598 P=P+1 :A$=A$+" " 
1600 PRINT LEFT$(GC$,23) A$; 
1610 IF T$=CHR$(29) AND DP< 

LEN(A$)-1 THEN P=P+1 
1620 IF(T$=CHR$(157)AND P>0) 

OR KJ=1 THENLIST1630 




1630 GOTO 1520 

1700 IF CP=1 THEN 1510 

1710 CP=CP-1:F0R F=CP TO TL: 

TX$( F) =TX$( F+1 ) : NEXT: 

TL=TL-1 
1720 GOSUB 2090 
1730 GOTO 1510 
1800 IF TL>499 THEN 1510 
1810 FOR F=TL+1 TO CP+1 STEP 

-1 :TX$(F)=TX$(F-1) :NEXT 

:TL=TL+1 :TX$(CP)="" 
1820 GOSUB 2090:GOTO 1510 

2000 X=0:IF TL>499 THEN 2060 

2001 IF LENCASX41 THEN TT$ 
CX)=LEFT$(A$,LENCA$)-1) 
:A$="":GOTO 2030 

2010 FOR 1=41 TO 1 STEP-1:IF 

MID$(A$,I,1)<>" "THEN 

NEXT; 1=41 
2020 TT$(X)=LEFT$(A$,40) :A$ 

=MID$(A$,41) 
2030 X=X+1 : IF A$<>"" AND A$<> 

" " THEN 2001 
2040 FOR I=TL+X TO CP+X STEP 

-1 :TX$(I)=TX$(I-X): 

NEXT I 

2050 FOR 1=0 TO X-1:TX$(CP+ 

I)=TT$C I) :NEXT I 
2060 A$=" ":P=0: PRINT LEFTS 

(GC$,23) A$; 
2080 TL=TL+X:CP=CP+X 
2090 IF CP<15 THEN S1=0:G0T0 

2100 
2095 S1=CP-15 

2100 PRINT"CSHIFT+CLR/HOME] " 
;:F0R K=S1 TO S1+15: 
PRINT TX$(K);:IF LEN 
(TX$(K))<40 THEN PRINT 
CHR$(160) 

2110 IF K=CP-1 THEN PRINT 
"CCOMM+7]LCTRL+91[:] 
CCTRL+01LCTRL+83" 

2120 NEXT 

2122 PRINT"[:CTRL+91CFLECHA 
izq.1"SP$ n :CTRL+430 
CC0MM+7J123456789 
CCTRL+4]0i:C0MM+7:i 23456 
789CCTRL+4T0CC0MM+7:123 
456789CCTRL+4T0CCOMM+7D 
123456789CCTRL+8] 
CCTRL+OT"; 

2130 PRINT"CCTRL+5J MEM LIBRE 
=CC0MM+63 ";40*(501-TL) ; 

2140 PRINT"i:C0MM+6JM0D0 0/W= 
[C0MM+61"0W"CC0Mn+6: 



EDIC ION-"; EM: PRINT 

"LCTRL+6: "SW$ M CCTRL+83 " 

;: RETURN 
2500 IF CP<5 THEN PM=CP 
2510 GET TBS: IF TB$=""THEN 

2510 

2512 IF PM=1 AND TB$= 

"CCRSR arribal" THEN 
2510 

2520 IF PM>1 AND TB$= 

"CCRSR arribalT THEN PM 
=PM-1 :CP=PM:GOTO 2550 

2525 IF PM<TL AND TB$= 

"CCRSR abajol" THEN PM= 
PM+1 :CP=PM:GOTO 2550 

2530 IF PM>5 AND TB$="TFLECHA 
arriba" THEN PM=PM-5:CP= 
PM:GOT0 2550 

2535 IF PM<TL-5 AND TB$= 

"CFLECHA izq.l" THEN PM= 
PM+5:CP=PM:G0TO 2550 

2540 GOTO 2560 

2550 GOSUB 2090:GOTO 2510 

2560 IF TB$=CHR$(136) THEN EM 
=0:GOSUB 2090:GOT0 1505 

2570 IF TB$OCHR$(148) THEN 
2580 

2571 IF CP<1 THEN 2510 

2572 FOR K=TL+1 TO PM+1 STEP 
-1 :TX$=TX$(K-1 ) :NEXT:TL 
=TL+1 :TX$(PM)="" 

2573 GOSUB 2090: GOTO 2510 

2580 IF TB$OCHR$C20) THEN 
2590 

2581 IF PM=TL THEN 2510 

2582 FOR K=PM TO TL:TX$CK)= 
TXSCK+1) :NEXT:TL=TL-1 

2583 TX$(TL+1)= M ":60SUB 2090 
:G0T0 2590 

2584 CP=CP-1 

2590 IF TB$="SI"THEN SF=SF+1 : 
IF SF=1 THEN SS=CP: 
GOTO 2510 

2600 IF SF=2 THEN SE=CP:SF=0 
:GOSUB 5130:G0T0 2510 

2610 IF TB$="S"THEN GOSUB 
5070 

2620 GOTO 2510 
3000 IF TL<2 THEN 3050 
3010 PRINT'TSHIFT+CLR/HOMEI 
CCRSR abajoHCCTRL+91" 
TAB(12) M CCTRL+4]RUTINA 
DE IMPRESORACCTRL+81**: 
CL0SE4 

3020 PRINT"C2*CRSR abajo] 

INPUT 27 



Aplicaciones 



3030 



3040 



CCRS 

CCTR 

DE 

CCTR 

GET 

R$<> 

IF R 



R dcha.DDESDE 
L+9]MCCTRL+0]EM0RIA 
SDE CCTRL+93 F 
L+OJICHERO?" 
R$:IF R$<>"M" AND 
"F" THEN 3030 
$="M" THEN 3060 



3050 GOSUB 4500 

3060 IF TL=1 THEN PRINT TAB 

(11)"C3*CRSR abajo] 

CCTRL+9] CCTRL+41N0 HAY 3080 

FICHERO EN MEMORIA 

[CTRL+8]":GQT0 3570 3090 
3070 KF=0:PRINT "CCRSR dcha.] 3100 




CCRSR aba j oJ LLENA 
BLOGUES VARIABLES 
(S/N)?" 

GET R$:IF R$<>"S" AND 
R$<>"N" THEN 3080 
IF R$="N" THEN 3150 
PRINT:PRINT "CCRSR 
abajoUCCRSR dcha.l 
CCTRL+9JTCCTRL+0] ECLADO 
CCTRL+9] FCCTRL+0] 
ICHERO?" 

GET R$:IF R$<>"T" AND 
R$<>"F" THEN 3110 
K=2:IF R$="T" THEN KF=1 
:G0T0 3150 



INPUT'TCRSR abajo] 
ESCRIBE NOMBRE DEL 
FICHERO"; VB$:VB$=LEFT$ 
(VB$,16) 

IF LEFT$(VB$,1 )<A OR 
LEFT$CVB$,1)>"Z" THEN 
3130 

PRINT'TSHIFT+CLR/HOMEU 
QUIERES CAMBIAR LA 
IMPRESORACS/N)?" 
GET R$:IF R$<>"S" AND 
R$O r, N" THEN 3160 
IF R$="S" THEN GOSUB 
3160 

PRINT'TSHIFT+CLR/HOME] " 
VB=0:PP=0:AS=0:LC=1 : 
PRINT'*QUIERES VER LA 
SALIDA POR PANTALLA"; 
PRINTCS/N) .<RETURN> 
PARA VOLVER AL MENU 
PRINCIPAL'*:BL=0 

GET R$:IF R$<>"S" AND 
R$O u N" AND RZT$OCHR$ 
(13) THEN 3200 
IF R$=CHR$(13) THEN 
RETURN 

IF R$="N" THEN P=DN: 
0PEN4,P,7, "CCRSR abajo] 
":G0T0 3220 

OPEN 3,4:PRINT CHR$C14) 
IF KF<>2 THEN 3240 



28 INPUT 



3230 IF DL=1 AND KF=2 THEN 
3232 

3231 IF KF=2 THEN 3236 

3232 OPEN 2,8,2,VB$+"s,R": 
INPUT#2,DV,DV:G0T0 3240 

3236 OPEN 1,1 ,0:INPUT#1 , 
DV,DV 

3240 GP$="":IF R$="N" THEN 
FOR F^1 TO GP:GP$=GP$+ 
" " : NEXT 

3250 FOR K=1 TO L-1 

3252 IF LEFTSCTXSCK)^)^^" 
AND LEN(TX$CK))-1>AS 
THEN AS=LEN(TX$(K)) 

3260 NEXT:IF AS>TW THEN 

PRINT "ERROR : D IRECC ION 
MUY LARGA":GOTO 3570 

3270 K=1 :PRINT#4,LF$;GP$; : 

AS$='"*:IFAS>OTHEN FOR F 
=1 TO GP+TW-AS:AS$=AS$+ 
" " : NEXT 

3280 TT$=TX$(K) 

3290 IF T$-""THEN PRINT#4, 
CHR$(13);GP$; :PP=0:LC= 
LC+1 :GOSUB 3590:G0T0 




3520 3302 NEXT F 

3300 BP=0:F0R F=1 TO LEN 3304 IF BP=0 OR KF=0 THEN 
CTT$):IF MID$(TT$,F,2)= 3390 

"] C'THEN BP=F:GOTO 3304 3310 IF KF=1 THEN 3370 



1 en su hogai.-^^^^^^i 1 1 




..Descubra el mundo de la informatica... 



...Aprenda a programai con facilidad... 



..Diviertase con los ordenadores... 



Recorte y envie este cupon de 
inmediato a EDISA, Lopez de 
Hoyos, 141-28002 Madrid, o bien 
llamenos al Telf. 1 91) 41 5 97 1 2 




... BOLETIN DE SUSCRIPCION llllllliniiniillllOl 

vj SI, envferane INPUT MSX durante 1 aflo (10 ejemplares + el extraordinario de verano) a] precio especial 
de oferta de 3.190 Pta». AHORRANDOME 660 Ptas- sobre el precio normal de portada de 1 1 ejem- 
plares sueltos. (For favor cumplimente este boletln con sus datos personales e indiquenos con una (X) la 
forma de pago por usted elegida, metalo en un sobre y depositelo en el buz6n mas pr6ximo) . 

J I I I I L__L I 1_1 I 1 -1- -I I I- .1,. I 



dcmic:l[o l_ 



I APELLUJQS 
J NUM I I I 



COD POSTAL 1 



POBLACIOM L L_ 



FORMA DE PAGO ELEGIDA: Reembolso Q Domiciliaci6ri Bancaria . . □ 

Tal6n nominativo que adjunto a favor de EDISA [ ] 

| INSTRUCCIONES DE DOMICILIACION BANCARIA (si es elegida por usted) ] 



Muy senores mios: 

Les ruego que. con cargo a mi cuenta n* 

Editorial PLANETA - ACOSTIN1 a nombre de: i i i i i 

S__l I I L L J BANCO; C AJSORRQ5 i__J I i_J t: " « 

j._ i " J j I I J__] DERECCION k E I L 1 1 J l^J I L_ 



. de I9_ 



_ ataendan. hasta nuevo aviso r el pago de los recibos que tes present ar£ 



INPUT 29 



Aplicaeiones 



3320 IF DL=1 THEN 3360 

3330 IF ST=64 THEN 3350 3421 

3340 INPUT#1 ,RP$:G0T0 3380 

3350 PRINT"ERR0R-N0 HAY SUFI 

CIENTES DATOS EN EL 3430 

FICHER0":G0T0 3570 
3360 IF ST=64 THEN 3350 3440 
3362 INPUT#2,RP$:G0T0 3380 
3370 B1_=BL+1 : PRINT : RP$="" : 

PRINT"ESCRIBE BLOQUE 3450 

VARIABLES ";BL; : INPUT 

RP$ 

3380 TT$=LEFT$(TT$,BP-1)+RP$ 

+MID$(TT$,BP+2) :G0T0 3452 
3300 

3390 CF=0:FOR F=1 TO 4: IF 3454 
LEFT$CTT$,1)-MII>$("S$*# 3460 
",F,1) THEN CF=F 

3391 NEXT F:0N CF GOTO 3460, 
3470,3490,3510 

3400 IF PP+LEN(TT$X=TW THEN 3465 
PRINT#4,TT$; :PP=PP+LEN 3470 
CTT$) :GOTO 3520 

3410 TA$=LEFT$(TT$,TW-PP) 

3420 CF=0:FOR F=1 TO LEN(TT$) 3471 
:IF MID$(TT$,F1)=" " 



THEN CF=F:GOTO 3422 
NEXT F:IF CF>TW THEN 
PRINT"ERROR-PALABRA MUY 
LARGA EN ";TT$:GOTO 3570 
IF RIGHT$(TA$,1)=" " 
THEN 3450 

IF LENCTA$>0 THEN TA$= 
LEFT$CTA$,LEN(TA$)-1) : 
GOTO 3430 

PRINT#4,TA$;CHR$<13); 
GP$; :PP=0:LC=LC+1 ; GOSUB 
3590:TT$=MID$(TT$,LEN 
CTA$)+1) 

IF TT$<>""THEN BP=1 ; 
GOTO 3400 
GOTO 3520 

PRINT#4,CHR$(13);CHR$ 
(13);GP$;:PP=0:LOLC+1 : 
GOSUB 3590:TT$=MID$(TT$ 
,2): GOTO 3300 
GOTO 3300 

TT$=MID$(TT$,2) :PRINT#4 
,CHR$C13);GP$;:IF PP<> 
TW THEN 3479 
FOR F=1 TO INTCTX/2): 
GOTO 3480 



Si se 1c hace diffcil encontrar INPUT 
en tu kiosco habitual, 
rescrvalo por adelantado, o haznoslo saber 
para que podamos remediarlo 



3479 PP=0 

3480 LC=LC+1 : GOSUB 3590: GOTO 
3300 

3490 TT$=MID$(TT$,2) :IF LEN 
(TT$X=TW THEN 3500 

3491 PRINT"ERR0R-N0 SE PUEDE 
CENTRAR"TT$:G0TO 3520 

3500 PRINT#4,CHR$(13);GP$;: 
FOR F=1 TO INT( CTW-LEN 
CTT$))/2):PRINT#, M "; : 
NEXT 

3501 PRINT#4,TT$ 

3506 PRINT#4,CHR$C13);GP$; : 

PP=0:LC=LC+1 :G0SUB 3590 

:G0T0 3520 
3510 PRINT#4,CHR$C13);AS$; 

MID$(TT$,2) ; :PP=0:LC=LC 

+1 :GOSUB 3590 
3520 K=K+1 :IF P=3 THEN FOR Z 

=1 TO 500:NEXT 
3530 IF K<TL THEN 3280 

3540 IF P<>3 THEN PRINT#4, 
LF$;LF$:GOT0 3550 

3541 PRINT.-PRINT 

3550 FOR Z=1 TO 4:CL0SE Z: 
NEXT Z 

3560 IF P=0 THEN 3190 

3561 RETURN 

3570 FOR Z=1 TO 3000: NEXT: 
FOR Z=1 TO 8:CL0SE Z: 
NEXT Z 

3580 RETURN 

3590 IF OTH THEN PRINT#4, 

LF$;LF$;GP$; :LC=1 
3600 RETURN 
5000 RETURN 



LA 
REDACCION 
GAMBIA 




mBECCION 




— Paseo— 

dela 
Castellana 

nf9S 
planta,14 

28046 

-Madrid- 



30 INPUT 



LA APROXIMACION 
FINAL 



RUTINA DE CONTROL DEL TECLADO 



COMPROBACION DE ATERRIZAJE 



SOBRE LA PISTA 



CHOQUES 



ESTIMACION DE DANOS 




Quita el piloto automatico, pero no 
exhales todavia el suspiro de alivio: 
a on tienes los mandos. Utilizando uni- 
camente seis teclas debes conseguir que 
el avion se pose suavemente sobre la 
tierra 

Con esta tercera y ultima parte del 
programa simulador de vuelo tendras 
por fin el control del aparato. 

Hay tres pares de teclas que te per- 
miten aumentar y disminuir la veloci- 
dad del motor, hacer que el avion vire 
o que sub a y baje. 

Te encontraras situado a 20000 me- 
tres de la pista de aterrizaje y a 2000 



metros de altura. No es facil manejar 
un avion, en especial si eres un piloto 
inexperto. No esperes convertirte en 
experto con unos cuantos vuelos, la 
capacidad de pilotar un avion es una 
habilidad que muy pocos adquieren en 
poco tiempo y con facilidad. 

Cuando vayas perseverando y ad- 
quiriendo mas experiencia en el con- 
trol de la aeronave, tus maniobras de 
aterrizaje iran mejorando. Despues de 
cada aterrizaje (o cada accidente) re- 
cibiras un informe con los detalles fi- 
nales del vuelo. Estudialo para ver 
que es lo que has hecho mal, e inten- 
ta corregir las deficiencias. 



El simulador de vuelo solo necesita 
unas cuantas lineas mas para estar 
completo. No te olvides de utilizar el 
cartucho del Simon's BASIC. 

I Is&kg, j para C-64 

3000 GET K$:IF K$=""THEN 
RETURN 

3010 IF K$="S" AND TO. 2 

THEN TC=TC-.2 
3020 IF K$="F" AND TC<8.8 

THEN TC=TC+.2 
3030 IF K$="Q" THEN PT=PT+1 
3040 IF K$="A" THEN PT=PT-1 
3050 IF K$="0" AND RL>-30 

THEN RL-RL-1 

Juegos INPUT 105 




clr/homeute saliste de 

LA PISTA" 
6210 IF AS<40 THEN PRINT 

"AFORTUNADAMENTE NO 

IVAS TAN DEPRISA" 
6215 IF AS<40 THEN PRINT 

"COMO PARA CAUSAR MU 

CHOS DA#OS" :GOTO 6500 
6220 IF AS<80 THEN PRINT"A 

ESA VELOCIDAD SALES CON 

POCOS DA#OS" 
6225 IF AS<80 THEN PRINT"Y 

LI6ERAS CONTUSIONES" 

:GOTO 6500 
6230 PRINT"SALIR DE LA PISTA 

A TAL VELOCIDAD NO DEJA 

SUPERVIVIENTES!" 
6500 COLOUR 6 ,6 : NRM: PRINT 

"[5*CRSR abajo][4*CRSR 

dcha .3 DETALLES FINALES 

DEL VUELO" 
6510 PRINT"tCRSR abajoHVELO 



> ■ - * > "■' >■ a- 



• • • 



• m 



3060 

3070 
5500 

5510 
5520 
5530 
6000 



6010 
6020 



IF K$="P" AND RL<30 
THEN RL=RL+1 
RETURN 

GOSUB 2000: GOSUB 3000: 
GOSUB 1000 
IF PZ<=0 THEN 6000 
GOSUB 2000:G0SUB 2060 
GOTO 5500 
IF ABS(RL)>RT OR 
OR PT<0 OR AS>80 
6100 

IF ABS(PX)>WR OR ABSCPY 6130 
)>1000 THEN 6200 
PAUSE 1 :PRINT"i:SHIFT+ 
CLR/ HOMED FELICIDADES 



6100 



6110 
6120 



PT>TP 
THEN 



6200 



POR UN BUEN ATERRIZAJE" 
:GOTO 6500 

FOR Z=1 TO 15:LINE 80, 
55,RND(1)*160,RND(1)* 
110,RND(1)*3+1 :COLOUR 
6,Z 

NEXT Z: PAUSE 3 
IF AS<40 THEN PRINT 
"CSHIFT+CLR/H0ME3UN 
GOLPE COMO ESE HAS 
DESTROZADO EL" 
PRINT"AVION Y HAS MA 
TADO A LOS PASAJEROS": 
GOTO 6500 

PAUSE 1 :PRINT":SHIFT+ 





106 INPUT Juegos 



CIDAD DEL AIRE=";INT 

CAS);"M/S" 
6515 PRINT"DISTANCIA = ";INT 

(SQR(PY*PY+PX*PX)) : 

PRINT"C3*CRSR dcha.] 

CABECEO = ";PT 
6520 PRINT"C4*CRSR dc'ha.] 

BALANCED =";RL: PRINT 

M L5*CRSR dcha .] RPM ="; 

INT(10*TC)/10;"X 1000" 
6530 PRINT N II3*CRSR dcha. 1 

DERIVA =";INT(ABS(PX)); 

"METROS":PRINT"CCRSR 

dcha .H ORIENT AC ION =";AD 

; "GRADOS" 
6540 PRINT"C2*CRSR abajoll 

OTRA VEZ (IICTRL+6]S/N 

CCTRL+4) ?" : FLASH 5,10: 

POKE 650,0 
6550 GET A$:IF A$<>"S" AND 

A$<>"N" THEN 6550 
6560 OFF:IF A$="N" THEN 



PRINT'TSHIFT+CLR/HOMEU 
CCTRL+1 ":COLOUR 6,1 : END 
6570 RUN 

El bucle principal que se extiende 
entre las li'neas 5500 y 5530, ha sido 
modificado de forma que se pueda uti- 
lizar la subrutina de control. 

Las lmeas 3000 a 3070 confieren al 
teclado el control del aeroplane Las 
lmeas 3010 y 3020 te permiten utilizar 
ID 153 P ara hacer que el avion vaya 



mas lento o mas rapido. Lo que haccn 
y [fG es modificar el valor del re- 



gimen de revoluciones del motor, in- 
crementando o decrementando la va- 
riable TC. De forma analoga, 



Q y 



alteran la inclinacion del avion, 

en otras palabras, al presionar [QJ , el 
avion tender a a descender, mientras 
que si aprietas | A 1 tendera a elevar- 
se, incrementando o decrementando 



PT. Analogame nte, la s lm eas 3050 y 
3060 hacen que \ 0] y jjF] actiien rao- 
dificando el balanceo de la aeronave, 
es decir, te permiten hacer virajes. 

Si en la lmea 5510 PZ resulta ser 
igual o menor que cero, el avion ha to- 
cado el suelo y el programa salta a la 
h'nea 6000. Las lmeas 6000 a 6540 se 
ocupan de determinar donde has to- 
rnado tierra y de comprobar si lo has 
hecho bien o mal. 

La linea 6000 comprueba si el ba- 
lance y la inclinacion estan dentro de 
los limites permitidos, de si el rumbo 
scguido es el correcto y de si la velo- 
cidad del aire esta por debajo de los 
80 metros por segundo. Si la velocidad 
o el rumbo seguido por el avion estan 
fuera de los (unites, el programa salta 
a la lmea 6100, que dibuja una serie 
de grietas en la ventanilla de la cabi- 
na. Despucs de una corta PAUSE, las 
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lineas 6120 y 6130 abordan una inves- 
tigacion y un posible proceso por par- 
te de las autoridades de Aviation Ci- 
vil; naturalmente ello significa que te 
has estrellado. 

La linea 6010 comprueba la posi- 
tion del aeroplano con relation a la 
pista de aterrizaje. La linea 6200 se 
ocupa de presentar las malas noticias: 
ATERRIZAJE FUERA DE LA PIS- 
TA. Si la velocidad del aire en el mo- 
rn en to de tomar tierra era menor que 
40 metros por segundo, las lineas 6210 
y 6215 te dicen al piloto lo siguiente: 
AFORTUNADAMENTE NO IBAS 
DEMASIADO RAPIDO Y LOS 
DANOS NO SON MUCHOS. El pro- 
grama salta entonces a la linea 6500. 

Si la velocidad del aire estaba com- 
prendida entre 40 y 80 metros por se- 
gundo, aparece el mensaje: CON 
ESTA VELOCIDAD HAS PODIDO 
ESCAPAR CON LIGEROS DANOS 
Y UNOS CUANTOS ARANAZOS. 
Si la velocidad era mayor que 100 me- 
tros por segundo, se trata de un caso 
para las autoridades de Aviation Ci- 
vil... 

Cuando el avion aterriza cor recta - 
mente, el ordenador salta a la linea 
6020, que se encarga de enviar el men- 
saje de aterrizaje con exito. Cualquie- 
ra que sea el resultado del aterrizaje, 
el siguiente paso es la rutina que con- 
tiene los detalles del vuelo, la cual co- 
mienza en la linea 6500. 

La linea 6500 presenta el tltulo de 
los detalles, mientras que las lmeas 
6510 a 6530 presentan todos los valo- 
res de las variables asociadas con el 
avion. Esta information es la que te 
permite -juzgar exactamente lo bien 
que lo has hecho. 

Al final del programa figura una ru- 
tina de ^OTRA VEZ? por si quieres 
intentarlo de nuevo. 

Observa que las agujas de los relo- 
jes mantienen las referencias de las 



LAS SERPIENTES 
SUMADORAS 



Guia a la serpiente hambrienta para 
que coma en el «Juego de la serpiente 
de INPUT». Al enguUir avidamente los 
suculentos numeros, la pequena ser- 
piente ira creciendo hasta hacerse 
enorme. Naturalmente, siempre que 
tengas la necesaria destreza. 

El juego de la serpiente es uno de 
los mas conotidos y mas faciles de ju- 
gar, pese a lo cual continua siendo 
enormemente enviciante. Por suerte, 
no hace falta recurrir al codigo maqui- 
na para programar un juego de este 
tipo; precis amente este es un juegp 
que ha marcado epoca en la historia 
de los ordenadores domesticos, figu- 
rando como uno de los mas satisfacto- 
rios que pueden escribirse en BASIC. 

JUG AIM DO EL JUEGO 

Ei objeto del juego es ir guiando a 
la hambrienta serpiente por la 
pantalla, de forma que 
vaya engullendo los nu- 
meros que van apare- 
ciendo de forma aleato- 
ria. Los numeros van 
disminuyendo, de 
forma que 



cuanto mas tarde la ser- 
piente, mas baja sera la 
puntuacion. Si tardas de- 
masiado y el numero se 
decrementa hasta cero, 
desaparecera y en su lu- 
gar aparecera otro nume- 
ro. Cada vez que la ser- 
piente se traga un nume- 
ro, su longitud aumenta 
en el correspondiente nu- 
mero de segmentos. 

Ten cuidado de no sobrepasar los 
bordes y de no permitir que la serpien- 
te se entrecruce consigo misma, cosa 
que te ira resultando mas dificil a me- 
dida que se va haciendo mas larga. Si 





condiciones iniciales del vuelo a modo 
de com pa ration para tu mejor control. 
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■ 


EL CLASICO JUEGO EN UNA 


VERSION PARA BASIC 


■ 


DIBUJO DE LA GOMIDA 


■ 


COMIENDO MUM EROS 


■ 


LA CULEBRA SE EXTIENDE 





atraviesas uno de los bordes o el cuer- 
po de la serpiente, el juego terminara 
y aparecera un mensaje de FUERA 
que cubre toda la pantalla. 

^^^^S para C-64 

10 POKE 53280,2:PQKE 53281,1 
:PRINT "[SHIFT+CLR/HOME] " 

20 HS=0 

30 DIM S(1000,2) 
40 POKE 54296,0 
100 S=0 
SC1,1)^10:SC1 / 2)=14 
S(2,1)=11 :S(2,2)=14 
S(3,1)=12:S(3,2)=14 
GOSUB 1500 
T=1 :H=3 
YV=1 :XV=0 

FOR N=1 TO 3:SP=1024+S 
<N,1)*40+S(N,2) rPOKESP, 
163:POKE 54272+SP,6 : NEXT 
Y=12:X=14 
P=0 

GOSUB 1000 

SP=PEEK(1024+Y*40+X).:IF 
SP=160 OR SP=163 OR Y=0 
THEN 2000 

H=H+1:IF H=1000 THEN H=1 
SP=1024+Y*40+X:P0KE SP, 
163: POKE SP+54272,6 
SCH,1)=Y:S(H,2)=X 
SP=SCT,1)*40+S(T,2)+1024 
:P0KE SP,32 

T=T+1 :IF T=1000 THEN T=1 
IF POO THEN 260 
P=INT(RND(1)*9)+1 : FY=INT 
(RND(1)*21 )+2:FX=INTCRND 
(1)*37)+1 

IF PEEK(1024+FY*40+FX)<> 
32 THEN 250 
SP=1024+FY*40+FX: 



POKE SP 
,P+48:P0KE 
SP+54272,0 

IF RNDC1X.95 THEN 290 
P=P-1 :IF P=0 THEN POKE 
1024+FX+FY*40,32 
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270 
280 



310 
320 
325 



330 



290 IF FYOY OR FXOX THEN 
170 

300 S=S+P:SP=1024+Y*40+X: 
POKE SP,163:P0KE SP+ 
54272,6:PRINT 
"CCLR/HOMEKCTRL+9] 
C6*CRSR dcha.ITS 
FOR N=1 TO P 
G0SUB 1000 

SP=PEEK(1024+Y*40+X) :IF 
SP=160 OR SP=163 OR Y=0 
THEN 2000 

H=H+1;IF H=1000 THEN 
H=1 

340 S(H,1)=Y:S(H.,2)=X 
350 SP=1024+S(H,1)*40+$(H,2) 

:P0KE SP,163:P0KE SP+ 

54272,6 

FOR H=1 TO 10: NEXT 
NEXT N 
GOTO 165 
GET A$ 

IF A$="Q" THEN YV=-1 : 
XV=0 

1020 IF A$="A" THEN YV=1 : 
XV=0 

IF A$="0 
YV=0 

IF A$="P 
YV=0 

Y=Y+YV: X=X+XV: RETURN 
FORN=0T039 : P0KE1 024+N, 
160 : POKES 52 96+N,0 : POKE 
1984+N,160:POKE56256+N 
,0:NEXT 

FOR N=1T023:P0KE1 024+N 
*40,160:P0KE 1 063+N*40 
,160 

POKE 55296+N*40,0:P0KE 
55335+N*40,0:NEXT 
PRINT'TCLR/ H0ME3 CCTRL+1 3 
CCTRL+9] PUNT0S"S;TAB(1 8) 
"LCTRL+9J MAYOR 
PUNTUACION";HS 
RETURN 

FOR F=0 TO 24: POKE 
54272+F,0:NEXT 
POKE 54273,8 
2020 P0KE54277,175:P0KE54278, 
30:P0KE54296,15:P0KE 
54276,129 
2030 PRINT"CCLR/HOME:";TAB 
C11) M CCTRL+3Di:CTRL+9: 
FUERA ! " 
2040 FOR F=0 TO 10:PRINT 
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355 

360 

500 

1000 

1010 



1030 

1040 

1050 
1500 



1510 



1515 



1520 



1590 
2000 

2010 



THEN XV=-1 



THEN XV=1 



"CCLR/H0MEJ"TAB(11) 
"FUERA!": FOR G=0 TO 90: 
NEXT: PRINT'TCLR/HOMEII" 
TABC11) "[CTRL+9^ FUERA" 

2050 FOR G=0 TO 90:NEXT G,F: 
POKE 54277,0: POKE 
54278,0 

2060 IF S>HS THEN HS=S 

2070 PRINT'TSHIFT+CLR/HOMEU 
E8*CRSR abajoJ"TAB(15) 
"PUNTOS"S:PRINT"L2*CRSR 
aba jo]"TAB(13) "MAYOR 
PUNTUACION"HS 

2080 PRINT TABC3)"IICTRL+9] 

L2*CRSR abajoHPULSA UNA 
TECLA PARA JUGAR DE 
NUEVO." 

2090 POKE 198,0:WAIT 198,1: 
PRINT'TSHIFT+CLR/ HOMED" 
:GOTO 100 



El primer Hstado del programa prin- 
cipal esta hecho para el Commodore 
64, pero si dispones de un Vic con una 
ampliation de memoria RAM de 3K, 
puedes jugar el juego, modificando las 
line as que figuran a continuation y no 
utilizando las llneas 2010 y 2020. He- 
mos tenido que limitar el tamano de 
la zona de juego a causa de lo limita- 
do de la memoria. 



para Vic-20 



1 REM**EN EL VIC CON 

33K DE EXPANSION SE TECLEA 

2 REM**EL MISM0 PROGRAMA QUE 
PARA EL C-64 

3 REM**CAMBIANE)0 LAS 
SIGUIENTES LINEAS 

10 POKE 36879,26: PRINT 




"cshift+clr/hone:" 

30 DIM S(308,2) 

40 POKE 36878,15 

135 POKE 36867,32 :GOSUB 1500 

140 T=1 :H=3 

145 YV=1:XV-0 

150 FOR N=1 TO 3:SP=7680+S 

(N,1)*22+S(N,2) :POKESP, 

163: POKE 30720+SP,6:NEXT 
190 SP=PEEK(7680+Y*22 + X) :IF 

SP=160 OR SP=163 OR Y=0 

THEN 2000 
200 H=H+1:IF H=308 THEN H=1 
210 SP=7680+Y*22+X:P0KE SP, 

163:P0KE SP+30720,6 
230 SP=S(T,1)*22+S(T,2)+7680 

:POKE SP,32 
240 T=T+1:IF T=308 THEN T=1 
245 IF POO THEN 260 
250 P=INT( RNDC1 ) *9)+1 :FY=IOT 



C RNDC1 )*13)+2:FX=INT(RND 
(1)-*18)+1 
255 IF PEEK(7680+FY*22+FX><> 

32 THEN 250 
260 SP=7680+FY*22+FX:P0KE SP 

,P+48:P0KE SP+30720,0 
280 P~P-1:IF P=0 THEN POKE 

7680+FX+FY*22,32 
300 S=S+P:SP=7680+Y*22+X: 
POKE SP,163:P0KE SP+ 
30720, 6:PRINT 
"CCLR/H0ME1[CTRL+93"S 
325 SP=PEEK(7680+Y*22+X) :IF 
SP=160 OR SP=163 OR Y=0 
THEN 2000 
330 H=H+1:IF H^308 THEN H=1 
350 SP=768Q+S(H,1 )*22+S(H,2) 
:P0KE SP,163:P0KE SP+ 
30720,6 
1500 FORN=OT021 :P0KE768D+N, 
160: POKE38400+N,0: POKE 
8010+N,160:POKE38730+N 
,0 




1510 POKE7680+N*22,160:POKE 

7701 +N*22, 160 
1515 POKE 38400+N*22,0:POKE 
38421+N*22,0:NEXT 

1520 print'Tclr/home] 
fctrl+93 cctrl+11"s; 

TABC10)HS 
2000 FOR Z=200T0127STEP-1 : 

POKE 36877, Z:NEXT 
2030 PRINT'T CLR/ HOMED C2*CRSR 
abajo]";TAB(9>"CCTRL+3] 
FCTRL+9H FUERA i " 

2040 for f=0 to 10:print 
"cclr/home::2*crsr 

aba j oil "TAB (9) "FUERA !" : 
FOR G=0 TO 90 :NEXT: 
PRINT'TCLR/HOME] r_2*CRSR 
abajo1"TAB(9)'TCTRL+93 
FUERA! " 



2050 FOR G=0 TO 90:NEXT G,F 

2070 POKE 36867, 174:PRINT 
"LSHIFT+ CLR/ HOME J 
£8*CRSR abajoIlL5*CRSR 
ami ba]PUNT0S"S: PRINT 
"C2*CRSR abajolMAYOR 
PUNTUACION"HS 

2080 PRINT "CCLR/HOME: 
CCTRL+9U PULS A UNA 
TECLA PARA JUGAR DE 
NUEVO." 

2090 POKE 198,0: WAIT 198,1 : 
PRINT"CSHIFT+ CLR/ HOME] " 
GOTO 100 

En la linea 10 se definen los colores 
de la pant alia y se borra esta, dejan- 
dola lista para los graficos del juego. 
La puntuacion maxima se pone a cero 
en la linea 20, mientras que la puntua- 
cion actual se pone a cero en la linea 
100. 

La linea 30 dimensions la matriz S, 
que se utilizara para almacenar las 
coordenadas de la serpiente sobre la 
pantalla. La maxima Iongitud de la 
serpiente es de 1000 segmentos para el 
Commodore 64 y de 308 para el Vic 
20; por ello, para definir cada position 
de pantalla hace falta una matriz bidi- 
mensional dc 1000x2 en el caso del 64 
y de 308x2 elementos para el Vic 20, 
ya que para cada position de pantalla 
se necesitan las coordenadas x e y. Ini- 
cialmente la serpiente ocupara las po- 
sitions (10,14), (11,14) y (12, 14). 
Las llneas 110 a 130 sitiian las coorde- 
nadas en los primeros tres pares de 
elementos de la matriz. 

La subrutina de definition de pan- 
talla empieza en la linea 1500 y es 11a- 
mada desde la linea 135. La linea 1500 
dibuja los bordes superior e inferior 
de la pantalla y las Kneas 1510 y 1515 
dibuja los bordes laterales. La puntua- 
cion actual y la maxima se establecen 
en la linea 1520. 

Las variables H y T que figuran en 
la linea 140 son los punteros de la ma- 
triz. H esta apuntando al par de ele- 
mentos que contienen las coordenadas 
de la cabeza mientras que T hace lo 
mismo para las coordenadas de la 
cola. En el caso de la linea 140, la cola 
esta almacenada en el primer par y la 
cola se almacena en el tercer par. 
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En la linea 145 se definen dos vec- 
tores, xv e yv, encargados de llevar el 
seguimiento de la direction en que se 
mueve la serpiente. Cualquiera de 
ellos puede tener uno de tres valores: 
El significa que la serpiente no esta 
mirando en esa direction; el 1 signifi- 
ca que la serpiente sigue recta o va ha- 
cia abajo, y el — 1 significa que sigue 
recta o va hacia arriba. La linea 145 
hace entonces que se mueva la ser- 
piente hacia arriba al principio del jue- 
go. 

La linea 150 POKEa la serpiente en 
la pantalla. Hay un bucle FOR ... 
NEXT que toma los valores uno a 
tres, lo cual hace que la serpiente este 
inicialmente formada por tres segmen- 
tos. La linea 160 utiliza dos variables: 
x e y, para hacer el seguimiento de la 
cabeza de la serpiente. A estas varia- 
bles se les asigna la position POKEa- 
da para la cabeza en la linea 150. La 
linea 165 contiene un indicador P. 
para saber cuando esta siendo presen- 
tado algun numero. 

La linea 175 llama a la subrutina de 
lectura del teclado, que empieza en la 
linea 1000. Las lineas 1010 a 1040 leen 
las teclas 



Q , A 



O 



y 



y es- 



tablecen los vectores de forma apro- 
piada. La linea 1050 utiliza estos vec- 
tores para calcular la position de la 
serpiente y finaliza la subrutina. 

La linea 190 comprueba si la ser- 
piente ha invadido alguno de los hor- 
des o se ha entrecruzado consigo mis- 
ma. Caso de que ocurra alguna de es- 
tas dos cosas, salta a la subrutina de 
«Final de Juego» que esta en la linea 
2000. Si la position de la serpiente es 
legal, la linea 200 incrementa el pun- 
tero de la cabeza y Io desplaza hacia 



atras hacia el principio de la matriz en 
caso de que haya llegado al final. La 
cabeza es POKEada en su nueva po- 
sition por medio de la linea 210 y la 
linea 220 se encarga de introducir la 
nueva position en la matriz. La linea 
230 borra la cola, de forma que la ser- 
piente no se vaya haciendo cada vez 
mas larga. La linea 240 incrementa el 
puntero de la cola y comprueba que 
todavia esta apuntando a un elemento 
situado dentro de la matriz. 

Cuando esta siendo presentado al- 
gun numero, la linea 245 envia el pro- 
grama a la 260. En caso contrario, ha- 
bra que presentar un nuevo numero. 
La linea 250 selecciona un nuevo nu- 
mero aleatorio y una position en que 
presentarlo. La linea 255 comprueba 
si la position elegida no es un espacio 
prohibido. Si asi es, el programa re- 
trocede de nuevo a la linea 250. La li- 
nea 260 POKEa el numero en la pan- 
talla. 

A medida que va transcurriendo el 
tiempo, el numero que hay en la pan- 
talla va siendo deerementado. En la li- 
nea 270 se introduce un cierto factor 
de aleatoriedad, comparando el nu- 
mero aleatorio con 0.95. En la mayo- 
ria de los casos, la linea de decremen- 
to de la puntuacion, que es la 280, se 
salta. Lo que hace esta linea es com- 
probar que dicho numero sigue sien- 
do mayor que cero despues de haber 
sido deerementado; en caso contrario 
dicho numero se borra. Si la cabeza 
no ocupa la misma posicidn de panta- 
lla que el numero en cuestion, la linea 
290 completa el bucle, enviando el 
programa nuevamente a la linea 170. 




Cuando la serpiente se come el nu- 
mero, el programa llega a la linea 300. 
La puntuacion se incrementa justa- 
mente en el valor del numero que se 
acaba de comer. La cabeza se POKEa 
en la pantalla y aparece el valor del 
tanteo alcanzado. 

El bucle FOR ... NEXT que se ex- 
tiende entre las lineas 310 y 360 aha- 
de a la serpiente el numero correcto 
de segmentos; este numero de seg- 
mentos esta determinado por el nume- 
ro que acaba de ser engullido por sus 
colmillos. Cada vez que se recorre el 
bucle, la linea 320 llama a la rutina de 
lectura del teclado; la linea 325 com- 
prueba si la cabeza sigue estando to- 
davia en una position legal y la 330 in- 
crementa el puntero de la cabeza. A 
continuation la linea 340 almacena en 
la matriz la nueva position de la cabe- 
za y POKEa dicha cabeza por medio 
de la linea 350. Para ahadir los nue- 
vos segmentos lo que se hace es no su- 
primir lo que sobra de la cola. Como 
el programa se encuentra ahora con 
menos cosas que hacer, el movimien- 
to de la serpiente se vera considera- 
blemente acelerado, pero introducien- 
do el retardo de la linea 355, la velo- 
cidad se mantendra constante. 

La section final del programa, que 
empieza en la linea 2000, es la rutina 
de fin de juego. En el caso del Com- 
modore 64, la linea 2000 deja a la ma- 
quina lista para generar un efecto so- 
noro. Las lineas 2010 a 2020 son las 
que generan dicho efecto. En el Vic 
20, el efecto sonoro se genera unica- 
mente en la linea 2000. No te olvides 
de subir el volumen del televisor. Las 
lineas 2030 y 2040 hacen que aparezca 
intermitentemente el mensaje FUE- 
RA! en el borde superior. Hay una pe- 
queria pausa en la linea 2050 antes de 
que el sonido se 
extinga. La li- 
nea 1060 actua- 
liza la puntua- 
cion maxima en 
caso de que sea 
necesario y la 
2070 presenta la 
puntuacion ac- 
tual y la maxi- 
ma. 
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COMMODORE 64 

1 El manual del cassette para el C-64 y VIC-20 

2 El libro de ideas para el C-64 

3 C-64 consejos y trucos I 

4 Peeks y Pokes para el C-64 

5 Diccionario para su C-64 

6 Lenguaje maquina para el C-64 

7 Lenguaje maquina para avanzados para el C-64 

8 C — 64 interno 

9 Graficos para el C— 64 

10 C-64 en el campo de la ciencia y la tecnica 

11 Mantenimiento y reparacion del floppy 1541 

12 El manual escolar para el C-64 

13 Robotics para su C-64 

14 Todo sobre el floppy 1541 

15 El ensamblador 

16 Introduction a la inteligencia artificial 

17 Todo sobre bases de datos y gestion de ficheros 

18 Todo sobre impresoras CBM 64-128 

19 C-64 consejos y trucos II 

20 El libro de estadisticas para el C-64 

21 El Commodore 64 como traductor 

22 C-64 rutinas del sistema 

COMMODORE 128 

101 Todo sobre el nuevo C-128 

102 C-128 consejos y trucos 

103 C-128 interno 

104 C-128 Peeks y Pokes 

105 C-128 para principiantes 

106 El gran libro BASIC C-128 

107 CP/M para Commodore 128 

108 Todo sobre ei floppy 1571/1570 

commodore: amiga 

201 AMIGA para principiantes 

COMMODORE C-16 
301 C-16 para principiantes 



1.696 
1.696 
2.968 
1.696 
2.968 
2.332 
2.332 
4.028 
2.332 
2.968 
2.968 
2.968 
2.968 
3.392 
2.332 
2.968 
2.332 
2.968 
2.332 
2.968 
2.332 
2.332 



332 
968 
240 
908 
908 
544 
3.392 
4.876 



4.134 



1.696 



SOFTWARE COMMODORE 





COMMODORE 64 




10001 


TEXTOMAT 


6.552 


10002 


PR0FIMAT 


6.552 


10003 


ADA 


13.104 


10004 


ELECTR0MAT 


4.592 


10005 


PL A T I IN E 64 


33.600 




COMMODORE 126 




1O101 


8ASIC 128 


6.552 



AMSTRAD CPC 

1001 El manual escolar CPC 464/6128 

1002 CPC 464/6128 consejos y trucos I 

1003 Peeks y Pokes CPC 464/6128 

1004 El lenguaje maquina para CPC 464, 664, 6128 

1005 CP/M el libro de ejercicios para el CPC 

1006 El libro de ideas para CPC 464, 664, 6128 
100? CPC 6128 para principiantes 

1008 CPC consejos y trucos II 

1009 El gran libro del floppy CPC 664/6128 

AMSTRAD PCW 
1101 PCW 8256 para principiantes 

MSX 

2001 MSX programas y utilidades 

2002 MSX graficos y sonido 

2003 El manual escolar MSX 

2004 MSX lenguaje maquina 

2005 MSX consejos y trucos 

2006 MSX para principiantes 

ZX SPECTRUM 

3001 ZX Spectrum consejos y trucos 

3002 El manual escolar ZX Spectrum 

ATARI 600XL/800XL/130XE 

4001 Avertturas y como se prograrrsa en el ATARI 

4002 Manual escolar para ATARI 600XL/800XL/10XE 

4003 Peeks y Pokes para ATARI 600XL/800XL/130XE 

4004 Juegos y estrategias y como se programs 

ATARI ST 

4101 ATARI ST Peeks y Pokes 

4102 ATARI ST consejos y trucos 

4103 ATARI ST para principiantes 

4104 ATARI ST aplicaciones graficas 

GENERALES 
6001 Todo sobre el procesador Z-80 

6201 Metodologia de la programacion 

6202 Metodologia y practicas LOGO 

6203 Practices BASIC I 



Procesador de textos con juego de caracteres castellano y Catalan 
Monitor y macroensamblador. 
Un potente lenguaje de programacion. 
Disenador de esquemas de circuitos. 
Disenador de circuitos impresos con trazo automatico. 



6.552 Compilador basic optimizado. 
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I.V.A. Y PORTES INCLUIDOS EN EL PRECIO 



SOLICIT! FOLLETO INFORMATIVO 

DATA BECKER 

=e-re Moret S.A. c/. C6rcega, 299 - 08008 BARCELONA 
Telfs.: (93) 217 62 38 - 217 69 01 - 218 02 93 




ASI ES EL MAPA DE MEMORIA 
DEL COMMODORE 64 (HI) 



Bytes $0039 y $003A = 57 y 58 

Aqm se guarda el numero de lmea 
con la que esta trabajando el progra- 
ma en BASIC en el momento presen- 
te. 

A medida que el programa avanza 
en su ejecucion este numero va sien- 
do actualizado automaticamente. 

Bytes $003B y $003C = 59 y 60 

Estos dos bytes almacenan el nume- 
ro de lmea de programa procesada 
previamentc. 

Bytes $003D y $003E = 61 y 62 

Este puntero es de algun modo 
complemento a las direcciones $39 y 
S3A. Almacena la direccion de la lf- 
nea de texto en BASIC que se esta 
procesando, No confundhio con el nu- 
mero de line a, puesto que se trata de 
la direccion de la memoria del orde- 
nador en la cual comienza la lmea. 

Bytes $003F y $0040 = 63 y 64 

Cuando existen lmeas con DATA 
en un programa se almacena en estas 
direcciones el numero de lmea al que 
se esta dirigiendo en cada momento el 
programa para la Iectura de datos. 

Bvtes $0041 y $0042 - 65 y 66 

Es un puntero que indica la direc- 
tion del siguiente elemento DATA 
debe ser leido. 



Bytes $0043 y $0044 = 67 y 68 

Este puntero indica la direccion de 
" : - . r:a del origen de la fuente de da- 
tes que utilizan en cada momento IN- 
- 7. READ o GET. 

Bytes $0045 y $0046 = 69 y 70 
40 INPUT 



Aqm se guarda el nombre de la va- 
riable (2 bytes) que se esta buscando 
en el momento en que es necesaria 
(consultar bytes $2D y $2E). 

Bytes $0047 y $0048 = 71 y 72 

Apuntador hacia el byte anterior al 
descriptor de la variable utilizada en 
cada instante por el programa en BA- 
SIC. 

Bytes $0049 y $004A = 73 y 74 

Contiene la direccion de una varia- 
ble utilizada en un bucle 
FOR... NEXT en ese instante. 

Bytes $004B y $004C = 75 y 76 

Durante las operaciones matemati- 
cas de comparacion se utilizan estas 
direcciones como memoria interme- 
dia. 

Byte $004D = 77 

Cuando se realiza una operation de 
comparacion se utiliza esta direccion 
para almacenar una mascara que de- 
termina si el resultado es mayor que, 
menor que o igual. 

Bytes $004E y $004F = 78 y 79 

Estas direcciones estan relacionadas 
con la definition de funciones — DEF 
FN — actuando como puntero hacia el 
descriptor correspondiente. 

Bytes $0050 a $0053 = 80 a 83 

Puntero hacia el descriptor de cade- 
nas utilizado en ese instante. Tambien 
almacena la longitud de la cadena. 

Byte $0054 = 84 




que es el primer byte de la instruction 
de salto (JMP) utilizada en el micro- 
procesador 6510 para saltar incondico- 
nalmente a cualquier direccion de la 
memoria. Completa el salto con una 
direccion procedente de la tabla que 
comienza en $A052. 



Contiene el valor constante $4C, Bytes $0055 y $0056 = 85 y 



Acumulador numero 1 para opera- 
ciones en coma flotante. Se utiliza 
tambien en conversiones de datos a 
distintos formatos (p.ej. coma flotan- 
te a enteros o viceversa). 




Vector del salto descrito en el ante- 
rior byte. 

Bytes $0057 a $005B = 87 a 91 



Actua como contador en una eva- 
luation de polinomios. Recoge el nii- 
mero de evaluaciones individuals que 
deben efectuarse para resolver una ex- 
presion. 

Byte $0068 = 104 

Byte de redondeo para el acumula- 
dor numero 1 en coma flotante. 

Bytes $0069 a $006E = 105 a 110 

Acumulador numero 2 en coma flo- 
tante. Su formato (exponente, manti- 
sa, signo) es el mismo para el acumu- 
lador numero 1 ($61 a $66). 

Byte $006F = 111 

Contiene el resultado de la compa- 
racidn de signos entre los contenidos 
del acumulador numero 1 y el acumu- 
aritmeticas, actua como acumulador lador numero 2. 
numero 3. 

Bytes $005C a $0060 = 92 a 96 

Byte de redondeo para el acumula- 
Registro utilizado en operaciones dor de coma flotante numero 1. 



Byte $0070 = 112 



aritmeticas, actua como acumulador 
numero 4, 



Bytes $0071 y $0072 = 113 y 114 



Registro utilizado en opraciones 



Bytes $0061 a $0066 = 97 a 102 



Puntero el buffer del cassette. 

INPUT 41 



RELACIONES 
LOGICAS 



Los ordenadores son capaces de eje- 
cutar millones de operaciones logicas 
por segundo. Pero la logica es aderaas 
una parte fundamental de cualquier 
programa. 

Hay tres tipos de expresiones que se 
utilizan en la programacion eon BA- 
SIC. Una gran parte de todo progra- 
ma esta constitufda por operaciones 
aritmeticas y las realizadas con cade- 
nas de caracteres; sin embargo, es el 
tercer tipo de operaciones, las realiza- 
das con las expresiones logicas. el que 
realmente se ocupa de la toma de de- 
cisiones dentro de un programa. 

Su funcion elemental consiste en 
evaluar si algo es «verdadero» o «fal- 
so». Las palabras y simbolos que uti- 
liza el programa para hacer esto se Ha- 
inan operadores (en algunos casos se 
Hainan tambien conectores. 

En las expresiones logicas se utili- 
zan dos tipos de operadores: los rela- 
cionales (que incluyen simbolos mate- 
maticos tales como <., > e =% y los 
logicos que fonnan parte del reperto- 



rio de palabras reservadas en todas las 
versiones del BASIC: AND, OR y 
NOT. 



MAYOR, IGUAL O MEIMOR 

Los operadores relacionales pueden 
utilizarse incluso en los programas 
BASIC mas sencillos. Las posibles 
comparaciones que utilizan estos ope- 
radores son: 



A > B 
A < B 
A =5 B 
A sS B 
A = B 
A <> B 



A es mayor que B 

A es menor que B 

A es mayor o igual que B 

A es menor o igual que B 

A es igual que B 

.. A es diferente de B 



Habras visto estos operadores utili- 
zados docenas de veces en los progra- 
mas de INPUT o en cualquier otra 
parte, y aunque su utilization es mul- 
tiple, su valor en las pruebas condicio- 
nales resulta mas evidente en relation 
con la sentencia IF ... THEN. Un 
ejemplo tfpico de esto es:B 



OPERADORES RELACIONALES 



6UNA COSA ES MAYOR, IGUAL 



MENOR QUE OTRA? 



OPERADORES LOGICOS 



USO DE AND, OR Y NOT 



IF A>B THEN PRINT "A ES 
MAYOR QUE B" 

En este caso, el valor de la variable 
A debe superar el valor de B para que 
se ejecute el res to de la line a. En los 
casos en que el valor de A permanez- 
ca por debajo del valor de B, el pro- 
grama se limitara a pasar a la lmea si- 
guiente. Puedes ver que es posible dis- 
poner de una cierta capacidad de sal- 
to condicional: si resulta un determi- 
nado conjunto de valores, el progra- 
ma hace una cosa; si resulta otro con- 
junto de valores, el programa hace 
otra cosa distinta. 

Los operadores relacionales no es- 
tan unicamente limitados a mane jar 
valores numericos; tambien sirven 
para comparar cadenas de caracteres. 
No obstante, hay que manejarlos con 
precaucion para evitar encontrarte 
con resultados inesperados. Se debe 
tener presente que la comparacion 
siempre se detiene en el numero de ca- 
racteres correspondiente a la mas cor- 
ta de las dos cadenas que se compa- 



progreiniacttn 



ran. Asi, si una de las cadenas contie- 
ne once caracteres, mientras que la 
otra solo siete, unicamente interven- 
dran en la comparacion los primeros 
siete caracteres de la cadena mas lar- 
ga, comparandose con sus correspon 
dientes en la cadena corta. 

Los caracteres se comparan uno por 
uno y de izquierda a derecha; de aqui 
pueden surgir los resultados inespera- 
dos. En una comparacion de tipo nu- 
merico, la proposition 5 > 10 es evi- 
dentemente falsa, pero en una compa- 
racion entre cadenas, puedes encon- 
trarte una sentencia en la que se com- 
paren dos variables en la siguiente for- 
ma: A$ > B$. Si A$ = «5» y B$ = 
«10» el ordenador compara en primer 
lugar el caracter que figura mas a la iz- 
quierda, que en este caso es un 5 en 
una de las cadenas y un 1 en la otra, 
y a continuation se para porque con- 
sidera que ya no tiene nada que com- 
parar. 

En consecuencia se obtiene un «ver- 
dadero» corno resultado de la compa- 
racion, debido a que 5 es mayor que 
1, pero el ordenador ignora los nume- 
ros restantes de la cadena mas larga. 
Tienes que estar atento para no co me- 
ter errores de este tipo. 

En las compara clones entre cadenas 
de caracteres, a las letras del alfabeto 



so les supone la siguiente relation de 
orden: «A» < «B» < «C» < «D» , et- 
cetera. Pero tambien aqm has de te- 
ner cuidado, ya que el ordenador no 
entiende realmente lo que estos carac- 
teres significan. Lo que hace es com- 
parar los codigos correspondientes a 
cada caracter, siendo igualmente sig- 
nificativos dentro de la cadena los es- 
pacios y otros caracteres que no son 
letras, pero que disponen tambien de 
un codigo propio. Como puedes ima- 
ginarte, esto podria causar estragos en 
un programa de clasificacion de cade- 
nas por orden alfabetico. 

Cuando ambas cadenas contienen 
una secuencia de caracteres parcial- 
mente identica, se considera numeri- 
camente mayor a la cadena mas larga. 
Pero observa que una cadena mas cor- 
ta es considerada mayor en una expre- 
sion como la siguiente: «ABD» > 
«ABCD» ya que la comparacion se 
detiene en cuanto se encuentra con la 
primera diferencia, es decir, al com- 
parar los codigos correspondientes a 
los caracteres «D» y «C». El funciona- 
miento es de hecho el mismo que se si- 
gue al asignar prioridades alfabeticas 
en la redaction de un mdice o un dic- 
cionario, en el que «para» figura an- 
tes que «paradoja», pero despues de 
«pan». 



VERPADERO O FALSO 

Toda comparacion produce un re- 
sultado que en realidad es un numero 
entero. Cuando la comparacion resul- 
ta ser falsa, el resultado es 0, mientras 
que cuando es verdadera el resultado 
cs 1, dependiendo del ordenador que 
sea. Teclea este comando en modo di- 
recto para observar el resultado que 
corresponde a tu ordenador: 
PRINT 6>5, 5>7 

La expresion de la izquierda es ver- 
dadera y la de la derecha falsa. En 
consecuencia obtendras en la pantalla 
un 1 o un 0. 

Los numeros enteros que obtengas 
como resultado de las comparaciones, 
puedes utilizarlos para realizar calcu- 
los dentro de tus programas. No obs- 
tante tienes que tener cuidado de no 
intentar hacer divisiones por 0, lo que 
te darfa un mensaje de error. 



OPERADORES LOGIGOS 



Las palabras reservadas AND, OR 
y NOT son operadores logicos que 
constituyen una poderosa extension a 
la capacidad de toma de decisiones 
por medio de la sentencia IF ... 
THEN. Por ejemplo puedes poner: IF 




Programocioii 



esto es cierto AND eso otro es cierto, 
THEN hacer una determinada cosa. 
De esta forma puedes ir construyendo 
funciones de gran complejidad. Estos 
operadores, que a veces se llaman 
tambien operadores booleanos (aun- 
que no debes dejarte impresionar por 
este nombre) se pueden utilizar en co- 
mandos directos o dentro de los pro- 
gramas para obtener un «valor de ver- 
dad» en condiciones de prueba que 
pueden llegar a ser muy complejas. 
De esta forma constituyen una alter- 
nativa muy comoda a lo que en otro 
caso seria un confuso conglomerado 
de saltos condicionales a base de una 
utilizacion masiva de sentencias IF ... 
THEN. 



USO DE «AND» 



En su forma mas simple, se puede 
considerar que el operador AND tie- 
ne el mismo significado que la conjun- 
cion espanola «y». En una expresion 
tal como la siguiente: 

IF V>0 AND V<100 PRINT 
"DENTRO DE RANGO" 

El mensaje solo aparecera en pan- 
talla cuando la variable V este com- 
prendida entrc y 100. 

En un programa puedes tener una 
lfnea como esta: 



990 0KAY=1 AND MES>5 AND 
MES<10 AND AN0M9O0 AND 
ANO<2001 

Esta lmea de programa te permiti- 
ria comprobar si una determinada fe- 
cha corresponde a un verano del siglo 
XX. 

En este caso se utiliza AND para 
realizar cuatro pruebas, cuyos resulta- 
dos deben ser todos ciertos para que 
OK siga siendo verdadera. En esta 
prueba de validacion se asigna en pri- 
mer lugar a la variable OK el valor 
«verdadero». A continuacion se impo- 
ne la condicion de que MES caiga en 
el intervalo de 6 a 9, y de que ANO 
este entre 1901 y 2000. Pero miremos 
un poco mas en detalle lo que ocurre. 
Si se cumplen todas las condiciones, 
todas las expresiones daran un valor 
verdadero. Asf, de hecho la lfnea de 
programa se convierte en : 

990 0KAY=-1 AND -1 AND ~1 
AND -1 AND -1 

Si ahora le ariades PRINT OK, pue- 
des comprobar que el resultado es en 
efecto 1 , es decir verdadero. 



USO DE «OB» 



El operador OR puede recibir una 
consideration en gran parte analoga a 



la de AND, aunque su significado es 
diferente, como ocurre con la conjun- 
cion espanola «o» en su uso cotidia- 
no. Tambien aqm observaremos su 
empleo en una sen cilia line a de pro- 
grama en la que se utiliza para com- 
parar los valores de una variable: 

IF V=8 OR V=10 PRINT "OKAY" 

El mensaje aparecera en la pantalla 
si el valor de la variable V es 8 o 10. 

El operador OR resulta de gran uti- 
lidad cuando se comprueba la validez 
de las entradas suministradas a una 
sentencia INPUT dentro de un pro- 
grama. Si por ejemplo el programa te 
pide que introduzcas tu edad, siempre 
habra alguien que tecleara — 10 6 999 
con la intencion de probar a ver que 
pasa. Pero puedes solucionar el pro- 
blema de la siguiente forma: 

10 INPUT A 

20 IF A<1 OR A>120 THEN 

PRINT ,: ESTAS DE BROMA?" : 
GOTO 10 



USO DE «NOT» 

El tercer operador logico que se uti- 
liza con frecuencia es el NOT. Es un 
poco diferente de los anteriores en el 
sentido de que solo utiliza un argu- 
mento, es decir, solo actua sobre la ex- 
presion numerica o logica que le sigue, 



Prograi««f!°i 



a diferencia de AND y OR que actuan 
sobre la expresion que les precede y 
sobre la que les sigue, es decir son 
operadores binarios o de dos argu- 
mentos. 

Puedes utilizar NOT en un progra- 
ma como el siguiente: 

IF NOT CA>10) THEN 999 

En el lcnguaje hablado normal, po- 
driamos traducir la anterior expresion 
mas o menos asi: «Si el valor de A no 
es mayor que 10, pasa a la linea 999». 

La funcion logica que realiza el ope- 
rador NOT es convertir una condition 
verdadera en falsa y viceversa. Puedes 
utilizarla pues para invertir el valor re- 
sultante de una prueba anterior. 



tar formas diferentes. Una forma tfpi- 
ca para el operador AND es: 

A B C 



APLICACION PRAGTICA 



-1 -1 



-1 





(Linea 1) 
(Linea 2) 
( L i nea 3) 
(Linea 4} 



TABLAS DE VERDAD 



El significado de la linea 1 de la ta- 
bla es el siguiente: «Si A es verdadera 
y B es verdadera, entonces C es ver- 
dadera^ El significado de la lmea 2 
es: «Si A es verdadera y B es falsa, en- 
tonces C es falsa». La linea 3 signifi- 
ca: «Si A es falsa y B es verdadera, en- 
tonces C es falsa». La linea 4 por su 
parte significa: «Si A y B son falsas, 
entonces C es falsa». Analogamente la 
tabla de verdad del operador OR es: 



En relacion con los operadores 16- 
gicos, te encontraras con mucha fre- 
cuencia con las «tablas de verdad». 

En realidad son algo muy sencillo 
que se utiliza para dar una represen- 
tacion visual de lo que ocurre cuando 
se hacen operaciones de AND y OR 
con los valores 1 y (verdadero y f al- 
so). El operador NOT no necesita en 
realidad una tabla de verdad, ya que 
basta con invertir los valores para ob- 
scrvar su efecto. 

Las tablas de verdad pueden adop- 



B 



C 



-1 

~ I 






-1 -1 

-1 

-1 -1 





La primera linea significa: «Si A es 
verdadera y B es verdadera, entonces 
C es verdadera». Las line as 2 y 3 pue- 
den ser ambas interpretadas como: «Si 
A o B son verdaderas, entonces C es 
verdadera». El significado de la linea 
4 es: «Si A y B son ambas falsas, en- 
tonces C es tambien falsa». 



Aquf tienes finalmente un progra- 
ms que utiliza los operadores AND, 
OR y NOT. Se trata de una version 
simplificada de un programa que cal- 
cula la escala correcta de salarios para 
alguien que ha solicitado un empleo: 

10 INPUT "EDAD";EDAD 

20 INPUT "NUFiERO DE NIVELES" 

;NIVELES 
30 LET MAS18=(EDAD>=18) 
40 LET CUAL=(NIVELES>=5) 
50 IF NOT MAS 18 AND NOT 

CUAL THEN PRINT "NO 

UT I LIZ ABLE*' 
60 IF (NOT KsAS18 AND CUAL) 

OR (MAS18 AND NOT CUAL) 

THEN PRINT "ESCALA 

SALARIAL UNO" 
70 IF MAS18 AND CUAL THEN 

PRINT "ESCALA SALARIAL 

DOS" 

Supongamos que como respuesta a 
las dos primeras sentencias INPUT, 
tecleas 20 anos de edad y cuatro nive- 
les O. Esto significa que (EDAD 5= 
18) es verdad, mientras que (ONIVEL 

5) es falso. En consecuencia la per- 
sona es MAS 18 (mas de 18 anos) y NO 
CUAL (no cualificada) . El ordenador 





UNA 
OPORTUNIDAD 
IRREPETIBLE 



Ahora tienes la ocasion de hacerte con los 
10 mayores exitos del aho 
en su presentacion original 
(cada uno en su estuche y con su caratula) 
a un precio de autentico chollo: 3.995 pts. 

Imagmate... Los 10 mejores titufos de 1986 
por poco mas de lo que cuesta uno solo. 

iiiPIDE EL SUPER-10 EN TU TIENDA 
ANTES QUE SE AGOTE!!! 



"SUPER-10" SPECTRUM 


"SUPER-10" AMSTRAD 


EXPLODING FIST 


EXPLODING FIST 


TURBO ESPRIT 


TURBO ESPRIT 


ROCK'N LUCHA 


ROCK'N LUCHA 


ZORRO 


ZORRO 


3 WEEKS IN PARADISE 


3 WEEKS IN PARADISE 


ABU SIMBEL (PROFANATION) 


ABU SIMBEL (PROFANATION) 


SABOTEUR 


SABOTEUR 


CAULDRON II 


CAULDRON II 


BRUCE LEE 


BRUCE LEE 


SPY HUNTER 


RAID OVER MOSCOW / 


"SUPER-10" COMMODORE 


"SUPER-10" M.S.X. 


EXPLODING FIST 


ALIEN-8 


URIDIUM 


KWIGHT LORE 


GOONIES 


GUNFRiGHT 


SABOTEUR / 


NIGHTSHADE 


BEACH HEAD II / 


JACK THE NIPPER 


CRITICAL MASS . 


SHOWJUMPER 


SPY HUNTER 


VALKYR 


ZORRO 


BOUNDER 


SUPER-ZAXXON 


MAPGAME 


FIGHTING WARRIOR 


JET SET WILLY !l 


. .... .. . 






encuentra enseguida este con junto de 
condiciones en la Imea 60, imprimien- 
do a continuation «ESCALA DE SA- 
LARIO UNO». Puedes ampliar facil- 
mente este programa para que com- 
pruebe mas condiciones, por ejemplo 
si el solicitante cuenta con mas de dos 
afios de experiencia, o cualquier otra 
circunstancia que sea necesaria para el 
trabajo. 

OPERACIONES NUM ERICAS 



El uso de los operadores logicos no 
esta unicamente limitado a las senten- 
cias IF ... THEN que acabamos de 
ver. Tambien se pueden utilizar en al- 
gunos tipos de operaciones numericas. 
Puede que ya las hayas visto utilizadas 
asi en algun programa y a lo mejor te 
has quedado maravillado de lo que su- 
cedfa. De hecho no siempre funcionan 
de la forma obvia que podria esperar- 
se. Teclea lo siguiente: 

PRINT 375 AND 47 

Tal vez esperas que el resultado sea 
422, o quizas 37547. Y sin embargo el 
resultado es 39. ^Que ha sucedido? 
Para explicarlo, tenemos que aden- 
trarnos algo mas en la forma de tra- 
bajar del ordenador, a fin de entender 
el modo en que este maneja los dos ar- 
gumentos cuyo AND se calcula. 

En principio ambas expresiones 



(375 y 47) se convierten en su equiva- 
lente binario de dos bytes. 

375 en binario es: 

0000000101110111 

Por su parte, 47 en binario es: 

0000000000101111 

A continuacion la funcion AND 
realiza una comparacion bit a bit so- 
bre los 16 bits, dando un 1 como re- 
sultado unicamente cuando hay un 1 
en el mismo bit de ambos numeros en 
binario. Empezando por la derecha, 
solo los pares de bits cero, 1, 2 y 5 
cumplen esta condition. Esto da como 
resultado el numero binario 
0000000000100111. 

Al volver a hacer la conversion a 
decimal, los bits 5, 2, 1 y puestos a 
1 dan un valor combinado de 39; este 
es el resultado de hacer un AND de 
375 y 47. 

Ensaya ahora el siguiente comando: 

PRINT 375 OR 47 

I A que se debe el resultado 383 que 
se obtiene en este caso? Al realizar la 
operacion con OR logico el resultado 
de cada comparacion bit a bit es 1 si 
hay un 1 en cualquiera de los bits del 
par que se compara.Observa de nue- 
vo la forma binaria de los numeros an- 
teriores y ver as que los bits 8, 6, 5, 4, 
3, 2, 1 y tienen un 1 en al menos uno 
de los bits del par. El numero binario 



resultante es 0000000101111111 que es 
383 en decimal. 

Con el operador OR es posible ob- 
tener el mismo valor de bits con ex- 
presiones diferentes. Por ejemplo, si 
tecleas PRINT 315 OR 75, el resulta- 
do es tambien 383. Si quieres puedes 
comprobarlo realizando la conversion 
de los numeros a forma binaria. 

El valor - 1 (que se almacena como 
FFFFFFFF en hexadecimal, es decir 
un conjunto de bits que son todos 1) 
queda inalterado cuando con el se rea- 
liza una operacion de OR logico con 
otro numero cualquiera. Para hacer la 
prueba, teclea el siguiente comando 
directo: 

PRINT -1 OR 375 

cuyo resultado es —1. 
Veamos ahora una aplicacion nu- 
merica para el operador NOT: 

PRINT NOT 10.75,N0T -11 

Los valores resultantes son —11 y 
10. Asi vemos que en efecto NOT 
suma 1 al numero sobre el que se apli- 
ca y a continuacion cambia su signo. 
Observa que el numero en punto flo- 
tante se redondea por defecto al ente- 
ro ma proximo y que es posible esti- 
mar el valor real por medio de X = 
-(X + 1). De hecho este valor se con- 
vierte a un entero de cuatro bytes, to- 
dos cuyos bits quedan invertidos. 




NUMEROS 
BAJO CERO 



Codigo ma 



CUANDO LOS NUMEROS NEGATIVOS 

SE HACEN MECESARIO S 

PROGRAMA DE CONVERSION PARA 

NUMEROS NEGATIVOS 

LA CONVENCiON DEL SIGNO 



La comprension de los numeros bi- 
narios y hexadecimales no suele ser di- 
ficil, pero la expresion de valores ne- 
gativos con estos sistemas de numera- 
tion puede presentar problemas. 

En la programacion de algunos jue- 
gos puede ser necesario utilizar valo- 
res negativos, por ejemplo, para des- 
plazarse sobre la pantalla en determi- 
nadas direcciones. Las direcciones van 
codificadas en grupos de ocho bits, ya 
que esa es la unica manera en que el 
ordenador puede almacenar los datos 
en la memoria. Pero surge un proble- 
ma; como nemos visto, un byte puede 
representar cualquier numero desde 
hasta 255, es decir, desde 0000 0000 
hasta 1111 1111. Pero con esto se ago- 
tan las posibilidades de un numero bi- 



nario de ocho bits, que ya no tiene si- 
tio para un signo menos o mas, ni for- 
ma alguna de representarlo. 

En la aritmetica ordinaria, al restar 
1 de se obtiene el valor — 1 ; aquf tie- 
nes ese mismo calculo realizado con 
numeros binarios de ocho bits: 

000C CO 00 
_ 1 

1111 1111 

Puedes probar a tomar un 1 presta- 
do de la columna situada mas a la iz- 
quierda, pero cuando el numero bina- 
rio esta limitado a ocho bits no hay 
manera de hacer nada. Analogamen- 
te, al restar otro 1 (en la aritmetica 
tradicional se obtendria como resulta- 



do un —2) tenemos 1111 1110, que en 
binario correspondc al numero deci- 
mal 254 : ya que 1111 1111 es 255. 

Esto no son curiosidades ti'picas de 
los numeros binarios: imagmate por 
ejemplo lo que ocurriria en decimal si 
solo hubiese tres sitios o columnas en 
las que poner los numeros. Mira lo 
que sucederia si se intentase sumar 
100 a 999 con estas limitaciones: 

100 
4 999 
(1)099 

El uno que figura en la columna de 
las unidades de mil, esta escrito entre 
parentesis; en un sistema aritmetico 



INPUT 49 



con solo tres columnas no hay espacio 
para las que «te llevas». En un siste- 
ma de solo tres lugares, el resultado 
de esta suma es pues 99, o sea, exac- 
tamente el resultado de 100 menos 1. 

De la misma forma, sumar 98 con 
100 en un sistema de tres lugares equi- 
vale a restar 2, mientras que restar 998 
de 100 equivale a sumarle 2. 

En conclusion, una misma sucesion 
de numeros de un byte puede repre- 
sentar un numero positivo o negativo , 
sin tener en cuenta la posible confu- 
sion o dificultad en el calculo. 

^Que hacer entonces? En la mayo- 
ria de las aplicaciones de los ordena- 
dores domesticos, este problema no 
suele plantearse: tanto las direcciones 
de memoria como los codigos de ope- 
ration, ambos expresados en binario, 
pueden considerarse siempre como 
positivos. Las unicas ocasiones en que 
se encuentran numeros negativos son 
en los datos o en los saltos del codigo 
maquina, equivalentes a los GOTOs 
del BASIC. 




CAMBIANDO LOS BITS 

Para pasar de un valor positivo en 
binario a su correspondiente negativo, 
hay que aplicar el llamado procedi 
miento del complemento a 2; no tiene 
una base teorica de facil comprension , 
pero sin embargo funciona bien. 

Para pasar desde un numero en bi- 
nario a su correspondiente valor nega- 
tivo, hay que cambiar los ceros por 
unos y viceversa, sumando al final 1 al 
resultado. 

El siguiente programa realiza preci- 
samente esta funcion. Observa que 
cuando el numero en binario esta li- 
mitado a ocho cifras, su equivalente 
en hexadecimal consta exactamente 
de dos cifras: esto quiere decir que 
tarnbien el equivalente hexadecimal 
del complemento a 2 es el correspon- 
diente valor negativo. 

TECLEA C-64 

1 REM**L":SIGNIFICA ESPACIO 
20 POKE 54277,33: POKE 54278, 
25 5: POKE 54273+23,1 5 : POKE 
276,33:P0KE 54273,0 

30 INPUT 



30 FOR Z=1 TO 8: READ ACZ) : 
NEXT Z: DATA 128,64,32,16 
8,4,2,1 

40 Z$="0123456789ABCDEF":A= 
: A$= "+-'*: A A=1 :P0KE 650, 
128:V$="C8*CRSR dcha.1!" 

50 POKE 53280,1: POKE 53281, 
: PRINT"L"SHIFT+CLR/ HOME] 
CCTRL+1DC4*CRSR abajo3" 

60 FOR Z=1 TO 9:PRINT TABC5 
"i:CTRL+9]n29*ESPACI0]": 
NEXT Z 

70 PRINT "CCTRL+3] 

CCRSR abajoJ" TABC9) 
"COMPLEMENTO A DOS" 

80 PRINT "CCLR/ HOMED" TAB 
C12) "NUMEROS NEGATIVOS" 

90 PRINT TABC12) " 









100 PRINT "CCTRL+SHCHGDEC 
[14*ESPACI0JBIN 
C14*ESPACI03HEX" 

110 PRINT'TFLECHA izqj 
C4*CRSR abajo]C8*RSR 
dcha COMPLEMENTO": PRINT 
"L"3*CRSR abajoD"TAB(29)" 
+1 " 

120 PRINT"L"4*CRSR arn'baD 
C2*CRSR dcha.]+"TAB(37) 

130 PRINT"C9*CRSR abajo] 




011 



140 PRINT'T3D0C6*ESPACI0] 

on no[]c:ocJC3oc3C30GC] 
onnoc]c:oc6*ESPAcio3 

00": GOTO 300 
150 GET K$:IF K$=" M THEN 150 
160 S=0:SS=0:IF K$<>" " AND 

K$<>"B" THEN 500 
170 A1=A:IF K$<>" " THEN 210 
180 IF AA=2 THEN A1=A1-1 
1 90 IF AA=1 THEN A1=A1+1 
200 GOTO 240 
210 IF K$<>"B" THEN 240 
220 IF AA=2 THEN A1=A1+1 
230 IF AA=1 THEN A1=A1-1 
240 IF AK0 OR A1>128 THEN 

AA-AA+1 
250 IF A1>128 THEN A1=127 
260 IF AK0 THEN A1=1 
270 A=A1 

280 IF A=0 THEN AA=1 
290 IF A=128 THEN AA=2:P0KE 
54273 ,9 : F0RZ= . 1 T020 : NEXT 



:P0KE 54273,0 
300 IF AA>2 THEN AA=1 
310 W=0:IF AA=1 THEN T=1 : 

TT=0 

320 IF AA=2 THEN T=0:TT=1: 
W=1 

330 A1=A-W:F0R Z=1 TO 8: IF 
A(Z)<=A1 THEN B(Z)=T: 
C(Z)=TT:A1=A1-A(Z> :GOT0 
350 

340 B(Z)=TT:CCZ)=T 

350 IF B(Z)=1 THEN S=S+ACZ) 

360 NEXT Z:A2=0:F0RZ=1 TO 8: 

IF CCZ)=0 THEN A2=A2+A(Z) 
370 NEXT Z:A1=C255-A2)+T:IF 

A1>255 THEN A1=0 
380 FOR Z-1 TO 8: IF A(Z)<=A1 

+W THEN DCZ)=1 :A1=A1-A 

(Z) :SS=SS+A(Z) :G0T0 400 
390 D(Z)=0 
400 NEXT Z 
410 PRINT'TCLR/HOME] 

C4*CRSR abajoJ";MID$CA$, 

AA,1) [ T4*ESPACI0: 

L4*CRSR izq.J"A 
420 PRINT'TCRSR ar ri ba3 "V$; : 






430 



440 



450 

460 
470 



480 



490 



500 



510 



520 GET J $: IF Z=1 AND CJ$="-" 

OR J $="+") THEN U$=J$: 

PRINT U$;:NEXT Z 
530 IF Z=1 THEN 520 
540 PRINT"*C*CRSR izq.IIG 

CCRSR izq.:";:IF J$= ,,,! 

THEN 520 
550 IF J$=CHR$(13) THEN 610 
560 IF J$=CHR$(20) THEN 500 
570 IF ASCCJ$)<48 OR ASC(J$) 

>57 THEN 520 
580 I$=I$+J$;PRINT J$;: 

NEXT Z 

590 GET J$:IF J$=CHR$(20) 

THEN 500 
600 IF J$OCHR$(13) THEN 590 
610 IF VAL(I$)<0 OR CVAL(I$) 

>128 AND U$="-")OR(VAL 

(I$)>127 AND U$="+")THEN 

500 

620 IF U$= M - M THEN AA=2: GOTO 

640 
630 AA=1 

640 PRINT: PRINT" CCRSR arribaD 
C39*ESPACI0:"; :A=VAL(I$) 
:G0T0 280 



LA CONVENCION DEL SIGNO 



FOR Z=1 TO 8:PRINT B(Z); 
: NEXT Z 

ZA=INT(S/16) :ZB=S-(16*ZA 
) :PRINT"C5*RESPACI0] " 
M1D$(Z$,ZA+1 ,1);MID$(Z$, 
ZB+1 ,1) 

PRINT "r:4*CRSR abajo: 
"V$;:F0R Z~1 TO 8: PRINT 
CCZ) ; :NEXT: PRINT 
PRINT"II7*CRSR abajoD";: 
IF AA=1 THEN PRINT"-"; 
IF AA=2 THEN PRINT"+"; 
PRINT"t:4*ESPACI0: 
L4*CRSR izq.3"A:PRINT 
"CCRSR arriba^"V$; 
FOR Z=1 TO 8:PRINT D(Z); 
: NEXT Z:ZA=INTCSS/16) : 
ZB=SS-(16*ZA) 
PRINT"C5*ESPACI03 "MID$ 
(Z$,ZA+1 ,1 ) ;MID$(Z$,ZB+1 
,1):GOTO 150 

I$= M ":PRINT"r_FLECHA izq.I 
:CLR/HOME:C21*CRSR abajol 
NUMERO ( ENTRE-1 28 Y +127)' 
C4*CRSR izq-D"; 
FOR Z=1 TO 4 



Como hemos dicho, para muchos fi- 
nes un numero en binario o en hexa- 
decimal corresponde perfectamente a 
un numero positivo o negativo. Sin 
embargo hay ocasiones en que se quie-. 
re conocer si un numero es positivo o 
negativo. 



Los saltos realizados en los progra- 
mas en lenguaje maquina requieren 
que se especifique el numero de bytes 
que abarcan, en valores positivos si el 
salto es hacia adelante y negativos si 
el salto es hacia atras. El ordenador 
examina el primer bit del numero bi- 
nario y determina por if solo si se tra- 
ta de un numero positivo o negativo. 
Si el primer bit es un 1, el ordenador 
considera el numero como negativo, 
mientras que si es lo toma como po- 
sitivo. 

Este procedimiento se ajusta a una 
determinada convention de signos. 
Esto signified que el ordenador, en vez 
de manejar numeros binarios que va- 
rian entre y 255, considera que su 
margen de variacion va desde -128 a 
+ 127. En el programa de conversion 
en complemento a 2, habras oido la 
sehal de «bip» al llegar a 128. Esto se 
debe a que 128, que en binario es 1000 
0000 y en hexadecimal es $80, corres- 
ponde a un valor negativo. (Haz la 
prueba: -1000 0000 + 1000 0000 = 
(1)0000 0000, que es en binario de 
ocho bits; 80 + 80 - (1)00, que es 
en hexadecimal de dos cifras; 128 - 
128 = en decimal.) 

^Que sucede entonces? Dado que 
1000 0000 tiene un 1 en su primer bit, 
el ordenador lo considera como un nu- 
mero negativo, el -128. Por otra par- 
te el cero, que es 0000 0000, tiene un 
en su primer bit, por lo que el orde- 
nador lo toma como un numero posi- 
tivo. 



SINTAX ERROR 

En el numero 12 de INPUT COMMODORE en el artfeulo «Aprovecha las interrupcio- 
nes», pag. 45, aparecieron unas erratas en la Ifnea 30. Esta debe quedar como sigue: 

30 T$="000000":F0R Z=0 TO 5: POKE 837-Z,VAL(MID$(T$ 
,2+1,1)): NEXT Z 

Del mismo modo la Ifnea 160 del listado de la pagina 46 debe quedar como se indica 
a continuation: 

160 DATA 157,14,30,169,0,157,14,150,232,136,208,239 
,76,191 ,234 

En el artfeulo «S6lidos de revolution* hay algunos errores en las lineas 60, 130 y 
1.510. Deberan quedar asi: 

60 LINE BX,BY,X,Y,2 

130 IF CP=12 AND X~M>140 THEN X=X-M 

1510 D=C:PY=IS*(Y*.5) 



INPUT 51 



LOS ME] ORES 

DE INPUT 
COMMODORE 

PUESTO TITULO PORCENTAjE 

1 . ° Commando 19,2% 

2° Green Beret 18,7% 

3° Sky fox 13,9% 

4. ° Uridium 12,8% 

5. ° Rambo 11,7% 

6. " Spindizzy 5,9% 

7° Hardball 5,8% 

8. ° Saboteur 4,6% 

9. ° Psi 5 Trading co 4,2% 

1 0. ° Biggies :\ 3,2% 



100 % 

Para la confeccion de esta relacion unicamente se 
han tenido en cuenta las votaciones enviadas por 
nuestros lectores de acuerdo con la seccion «Los 
Me] ores de Input*. 

Noviembre de 1986. 



LOS DESACTIVADORES 



Te encuentras al frente de 
un equipo de androides 
especi a Li zados en La 
desact i vacidn de 
expLosivos. Corre eL ano 
2018. 

La mi si 6n consiste en 
recoger Las bombas que un 
grupo terrorista ha ido 
di semi nando por Las 
i nstaLaciones de un 
importante centro secreto 
de desarroLLo, eL Instituto 
de Investigaciones 
GravitacionaLes . Debes 
localizar los artefactos 
depositados en cinco 
edif icios. 

Existen dos i nconveni entes . 
Por un Lado Los robots 
guardianes han sido 
reprogramados para atacar a 
todo lo que vean, sin 
preguntar. Por otro cada 
estancia tieneun diferente 
niveL de gravedad. 
Lo mas sorprendente de este 
juego de laberinto es eL 
impresionante efecto 
t ri di mensi ona L conseguido. 
Las habitaciones aparecen 
dibujadas en perspectiva y 
Los androides ven afectado 
su tamaRo en funcion de La 
distancia. Si muLtcineamente, 
aparecen visuaLizadas dos 
estancias adyacentes. 
En La parte inferior de La 
pantaLLa veras un diagrama 
deL edificio con La 
ubicaci6n de Los 
expLosivos, asi como La 
puntuaci6n y La cantidad de 
ayudantes que te quedan. 
Recuerda, no hay puertas 
traseras, s6lamente podras 
saLir por La principal. 
Para compLicar mas aan Las 



cosas, deberSs coLocar 
determi nados circuitos 
eLectr6nicos en La saLa deL 
ordenador, sino surgiran 
graves probLemas. 
Mediante el joystick, 
eliges desde el mapa aL 
andoride que deseas manejar 
en cada momento. Despu£s 
podras pasearLo por Las 
habitaciones. Igualmente es 



DATOS GENERALES 

TTTULO Deactivators 
FABRICANTE Tigress Marketing 
ORDENADOR Commodore 64 

TERM DEL PROGRAMA 

Desactivador de bombas 




factible examinar Las 
habitaciones y soLtar Las 
bombas y los circuitos 
empLeando La ventana de 
control de iconos (figuras 
representati vas de los 
elementos). Existe una 
Limitaci6n, cada androide 
soLamente puede Llevar un 
elemento simuLtSneamente, 
por Lo que debes ser habi L 
en Las secuencias de manejo 
de bombas y circuitos. 



decidiendo si quieres pasar 
tu bomba a otro 
robot . 

Aunque en un primer momento 
no Lo pueda parecer. 
Deactivators es un juego de 
i nteligenci a, que exige una 
atencidn extremada unida a 
La necesidad de dotes de 
observaci6n. Desde luego el 
ent reteni mi ento esta 
asegurado, aunque no se 
cacen marciarn tos. 
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MAIL ORDER MONSTERS 



Mail Order Monsters es un 

curioso tltuLo para un 
juego muy curioso, que te 
LLevara a tierras y tiempos 
muy lejanos, perdidos en La 
prehistoria de aLgdin 
pLaneta desconocido. 
EL programa posee tres 
niveLes de juego. EL 
primero es una especie de 
presentaciAn reducida de Lo 
que sucedera en Los dos 
si gui entes. 

Todo se compra y se vende, 
puedes pedl r a La fabrica 
de "morfos" eL monstruo de 
tu preferencia, partiendo 
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DATOS GENERALES 

TfTULO Mail Order Monsters 
FABRIC ANTE Electronics Arts 
It ORDENADOR Commodore 64 

G TEMA DEL PROGRAMA 

Mezcla entre Arcade y Juego de Es- 
| trategia 



CALIFICACION (Sabre 10 ptos.) 



ORIGINAUDAD 
INTER ES 
GRAFICOS 
COLOR 
SONIDO 



9,5 
10 
9,5 
9 
8 



TOTAL 



46 



desu cataLogo de doce 
criaturas- 

Lo mas excitante deL juego 
es eL torneo. SoLo frente 
aL ordenador o contra un 
amiguete, deberas eLeglr aL 
monstruo que te represente. 
Los monstruos Lucharan en 
distintos sectores, 
despLazandose por ellos a 
goLpe de joystick. Con eL 
propio botAn de disparo 
obLigaras a tu servidor aL 
ataque en su especi a Lidad; 
aLgunos LLegan incLuso a 
escuplr. Pero ojo, debes 
vigiLar sus variabLes 
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vitaLes para conocer en que 
momento fisico se 
encuentra. 

Existen otros monstruos 
desperdi gados por este 
mundo tenebroso. Pueden 
aparecer en cuaLquier Lugar 
y atacaran a cuaLquiera de 
Los contricantes que Les 
apetezca . 

EL juego tiene muLtitud de 



recursos que compLican tu 
acceso a La victoria y que 
decubriras cuando Lo 
practiques . 

Tu principaL baza consiste 
en eLeglr un monstruo 
capacitado, pero en eLLos 
nada es redefinibLe. Por 
ejemplo, existe una abeja 
venenosa, un encantador de 
brontosaurios, etc.. Busca 
bien entre Los doce 
disponibLes, que podra ser 
un monstruo baboso, o 
quizas tenga una armadura 
inaLterabLe o una 
inteLigencia digna de 
envidia. Tambien varia La 
fuerza fisica, eL LLamado 
cociente vita L etc... 
Es en su segunda y tercera 
fases donde este programa 
se distingue de Los demas- 
Para comenzar, te 
encuentras en medio deL 
LLamado "Centro de 
seLecciAn". Por medio deL 
joystick puedes despLazarte 
hacia eL LLamado "Centro de 
compras", que no es sino un 
supermercado deL horror. 
Los quinientos Psychons ( 
es eL nombre de La moneda 
de cupso LegaL en ese 
pLaneta ) te serviran para 
comprar eL monstruo de tus 
suenos. Lee atentamente Las 
ventajas e i nconveni entes 
de cada uno y, sobre todo, 
trata de evaLuar su 
reLaciAn ca lidad/preci o. Un 
monstruo baboso por ciento 
ochenta Psychons puede ser 
un muy buen negAcio, si 
tras esto compramos un poco 
mas de cerebro para §1- Un 
poco mas de fuerza y coraje 
no Le vendrS nada maL 
tampoco. Pero cuidado, no 
gastes todo Lo que tienes, 
porque queda un apartado 
mas: eL armamento. Este 
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cubre primero sus 
necesi dades de defensa. 
Podras elegir desde un 
Laser de protones 
defensivos hasta un 
tentcSculo extra, o 
simplemente una armadura 
"de Las baratltas". 
SaLimos del aLmacen. 
Ya tienes un magnifico 
animaL pero aun no es Lo 
bastante peLigroso teniendo 
en cuenta el barrio. Habra 
que darse un garbeo por La 
armeria para selecionar 
aLgo conque defenderse 
nuestro pobre bicho, tal 
vez una espada, un 
LanzaLlamas, una granada e 
incLuso eL pedrusco 



"vuLgaris". Aqui La 
seLeci6n del armamento ha 
de ser acorde con Las 
estrategias de Lucha que 
pienses adoptar. EL aLmacen 
dispone de mas de treinta 
armas diferentes, cada una 
tiene una utilidad muy 
definida. Por Lo demas La 
accion se desaroLLa cotno en 
La primera fase. 
Idem para La tercera fase, 
que requiere un serio 
ent renami ento con respecto 
a Las dos anteriores. Cada 
"morfo" sera asociado a 
cada tipo de Lucha, a cada 
ci rcunstancia y a cada tipo 
de Lucha. En esta diltima 
etapa todo es redefinible: 



alimento deL animalito, 
botiquln, vi tam1 nas, etc... 
A pesar de una animaciAn 
grafica que no sorprende, 
este j uego dispone de una 
serie de opciones que 
enri quecen 

considerabLemente La acci6n 
deL juego, sobre todo en Lo 
que se refiere a La 
estrategia. No hay que 
oLvidar que e"ste es un 
juego de estrategia con 
gran dosis de 
i nteracti vi dad. 
Por otro Lado, estamos ante 
un programa totaLmente 
adaptado al casteLLano para 
mayor integracion deL 
usuario en Las aventuras. 
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CONTINUACION DE EXPLODING 
FIST 



Exploding Fist II: La 

Leyenda continAa Tras unos 
segundos de espera, veras 
La imagen de un karateka 
pegando una patada contra 
una mesa como anticipo de Lo 
que viene a continuaci An. 
Eres un activo Luchador que 
debe Luchar hasta eL fin 
con un senor de La guerra. 
EL maLvado tiene su guarida 
en un volccm. 

Pasas por una etapa previa 
de aprendizaje de nuevas 
te'cnicas marciales. La 
recoLecci6n de objetos 
dispersos por Las pantaLLas 
y Lograr victorias ante 
quince oponentes aportan 
esos nuevos conocimientos. 
Exploding Fist II es un 
juego similar aL anterior 
en cuanto a surtido de 
patadas: voltereta atrSs y 
adeLante, golpe de mano a 
La cara, el estomago y Las 
piernas, etc. 



Las t£cnicas permitidas son 
identicas, pero La calidad 
grafica difiere mucho, ya 
que su predecesor estaba 





pLanteado sobre pantaLLas 
estaticas. Ahora se dispone 
de un fondo continuo que se 
desplaza en scroLLing. 



DATOS GENERALES 

TTTULO Exploding Fist li 
FABRICANTE Melbourne House 
ORDENADOR Commodore 64 

TENIA DEL PROGRAMA 

Artes Marciales 



CALIFICACION (Sobre 10 ptos.) 


ORIGINAUDAD 


7,5 


IHTERES 


8 


GRAFICOS 


8 


COLOR 


6,5 


SONIDO 


6 


TOTAL 


36 
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EL karateka se desplaza por 
una mansi6n china en un 
escenario tropical. 
Apareces sobre el tronco de 
un cirboL situado sobre un 
rio con abundante de 
vegetaciin. Pasas a otro 
tronco, pero en este punto 
eres interceptado por un 
atacante enmascarado, que 



te propicia una magnifica 
patada en toda la cara. 
La experiencia con el 
joystick que adquiriste en 
La primera parte sera de 
vital importancia para 
salir victorioso en La 
nueva aventura. 
La masi6n perece un 
rascacielos mas que una 



casa china, porque nunca se 
acaban las plantas. Cada 
pLanta tiene un oponente de 
mayor nivel que el 
anterior, haciendose mas 
Lenta La progresiin hacia 
e L f i na I . 

EL juego acaba cuando 
Logras veneer al debilitado 
y perverso senor de La 
guerra, tras eLudir sus 
trampas y derrotar a sus 
guardaespa Idas en La cueva 
del volcan. 

Es un juego clasico de 
artes marciales con 
elogiables ca ra cteri st i cas 
graficas y elevado niveL de 
realismo en los 
movi mi entos . 



PARALLAX 

La saga Uridium ataca de 
nuevo. Este juego es otra 
de sus variantes, que esta 
vez permite el scrolling 
(desplzamiento) en las 



cuatro direcciones- 
Debes escapar de Los 
marcianos que se supone 
eran amigos, una vez que 
descubres algo que no 
debieras conocer: sus 
planes para invadir nuestro 
planeta. Tienes que lograr 



DATOS GENERALES 

TTTULO Parallax 
FABRICANTE Ocean 
ORDENADOR Commodore 64 

TENIA DEL PROGRAMA 

Com bate espacial 



CALIFICACION (Sobre 10 ptos.) 


ORIGINAL! DAD 


8 


INURES 


8 


GRAFICOS 


9 


COLOR 


8 


SONtDO 


7 


TOTAL 


40 




que Los pLanes de 1nvasi6n 
sean conocidos por Los 
confiados terrestres- 
Antes de marcharte tendras 
que recoger a Los 
cientlficos que coLaboraban 
en el planeta ahora 
enemi go. 

Aunque tu zona de vuelo 
aparece a vista de pAjaro, 
puedes variar tu altitud 
pasando por debajo o encima 
de los obstaculos que se 
interponen en tu ruta. La 
sombra que proyecta si rve a 
su vez para que evaLues La 
altitud de La nave. 
Existen varios niveLes y 
pasas de uno a otro una vez 
que franqueas la barrera de 



*■ mm 

mimmimmii 
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seguridad. Deberas conocer 
un c6digo que permite La 
destruccion de La linea que 
impide tu avance. Permanece 



atento a Los 
aparecen por 
pie deL mapa. 
Es de destacar 



mensajes que 
una ventana at 



deL 



WAR 



La primera impresiin que 
nos produce este nuevo 
juego es que se trata de 
una version ampLiada del 
clasico Uridium 
Aqul tomas eL protagonismo 
en forma de un habiLidoso 
piloto que maneja La nave 
de guerra mas avanzada 
tecnologi camente que existe 
y debes Librar a La Tierra 
de Los moLestos invasores. 



La Limpieza 

★★★★★★★★★★★★★★★★★★★★★★★ 

a Los invasores y despues 
entrar en cada ciLindro 
para terminar con Lo que 



scroLLing del fondo. La 
musica es tambien otro 
eLemento que demuestra Lo 
eLaborado deL programa. 




n mesne, v-.mmvt <g 




rz ps fx re .pf :'s* a ffsrp* 
13 mmm: ? hccbm tt 




con eL joystick. Una vez 
que penetras en el interior 
de un ciLindro, cornienza 



DATOS GENERATES 


TTTULO War 




FABR1CANTE Martech 




ORDENADOR Commodore 64 




TENIA DEL PROGRAMA 




Combate Espacial 








CALIFICACION (Sobre 10 ptos.) 


0RIG1NALIDAD 


6 


INTERES 


8 


GRAFICOS 


8 


COLOR 


8 


SONtDO 


9,5 


TOTAL 


39,5 



Nuevamente eres eL eLegido. 
Se cierne sobre eL planeta 
La amenaza marciana, que 
avanza con La pretensiAn de 
aduefiarse deL pLaneta azuL. 
La conf ormaci 6n 
ext raterrestre esta formada 
por veinte ciLindros unidos 
entre si, posibi Litando La 
evacuacion urgente en caso 
de ser daftado cualquie'ra de 
eLLos. Cada uno tiene su 
cometido, sea miltitar, 
residencia L, etc. 
Tendras que ir destruyendo 



queda de el, pero eL tiempo 
es Limitado. 

Despues habrSs de eLegir un 
c6digo de colores correcto 
para Lograr saLir. 
a fuerza cent ri peta, 
producida mediante eL giro 
de Los ciLindros, actua 
como gravedad hacia eLLos. 
Tienes que burLar y 
deshacerte de Las patruLlas 
de controL que trataran de 
cazarte . 

EL manejo de La nave se 
efectua, como en habitual, 



automata camente La cuenta 
atrSs para su 
autodest rucci 6n. Debes 
LLegar aL panel que 
contiene cinco filas de 
celulas de memoria y 
cursores de movimiento en X 
e Y. EL color de La 
cerradura se vera en Las 
partes superior e inferior 
de La pantalLa. Tienes que 
apuntar el cursor a La 
celdilla del color marcado 
para abrlr La puerta. La 
rapidez es fundamental. 



ASTERIX Y EL CALDERO MAGICO 



Los simpaticos amigos 
Asterix, Obeli x y 
Panoramix, vuelven a Las 



andadas en tierras de la 

Bretana francesa. 

Por si no Lo recordais, 



Asterix es eL pequeno y mas 
cordial de La 

pandi I la .Tambi £n es listo. 
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r 



^vislade Software 



pero no es tan fuerte como 
su amigo el regordete 
ObeLix porque eL no cay6 en 
un caLdero de brebaje 
magico cuando era un bebe. 
Desde entonces ObeLix es 
"fuerte como un mulo y Le 
esta prohibido beber 
nuevamente del mismo. Sin 
embargo, siempre trata de 
ver si puede consegui r un 
poco. 

En uno de esos intentos, es 
cuando cobra vida el juego. 
ObeLix, eL repartidor 
oficial de menhires, hace 





busca de Los pedazos 
dispersos del caLdero, ya 
que es impresci ndible para 
preparar la p6cima, y sin 
elLa no podran veneer nunca 
a Los romanos ". 
Esta es La ingrata mision 
de nuestros personajes. 
En la pantaLLa aparecen 
varios indicadores. El 
primero es eL niimero de 
jamones que tienen Los 
amigos Asterix y ObeLix. 
Comprobareis que no pueden 
LLevar mas de 5 a La vez, 
pero empiezan con solo dos. 



DATOS GENERAL ES 

HTULO Asterix y El Caldero Magico 
FABRICANTE Melbourne House 
ORDENADOR Commodore 64 

TEMA DEL PROG RAMA 

Aventuras de Asterix 



CALIFICACION (Sobre 10 ptos.) 



ORIGINAUDAD 
I UTERES 
GRAFICOS 
COLOR 
SONIDO 

TOTAL 



9 
8 
8 

8,5 
6 

39,5 



Cuando quieras mas fuerza, 
basta con que dispares 
rapidamente para beber unos 
sorbitos de La fabulosa 
p6cima ■ 

El juego esta bien 
resuelto. Los graficos se 
generan en La pantaLLa y 
tardan dos o tres segundos 
en realizarse. El sprite de 
los dos principales 
personajes no estan en La 
linea de este fabricante. 
Un curioso si sterna de 
ventanas es utilizado para 
Las escenas de Lucha. 





cola para recibir su racibn 
de brebaje- El druida 
Panoramix le dice que 
"verdes Las han segado..". 
En un momento de enfado, 
ObeLix Le pega una fuerte 
patada a I caldero, 
rompiendolo en 8 trozos 
ante los ojos atftnitos de 
los miembros del pueblo. 
PanoramiX, sin perder un 
momento, recoge el poco 
liquido que no ha absorvido 
La tierra y se lo entrega a 
Asterix. 

Nuestro heroe marcha en 



Asi que es recomendable 
darse una vuelta por el 
bosquecillo situado al este 
del campamento. 
Tambien se ve un dibujo que 
representa al caldero, el 
namero que aparece a su 
Lado indica La cantidad de 
piezas recogi das . 
Otros tres indicadores 
muestran las vidas 
disponibles, si tienes una 
Have muy &til para abrlr 
cualquier puerta que 
encuentres y, por ultimo, 
el consumo del brebaje. 



Cuando Asterix se encuentra 
con un enemigo, o un 
j aba LI, aparece una ventana 
sin coLor en La que se ve 
ampliada la escena. 
Existiran muchas ocasiones 
de pelea, porque las piezas 
del caLdero se haLLan 
sietnpre en territorio 
enemigo y abundan Las 
patrullas de esos locos de 
romanos. 

★★★★★★★★★★ 
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FINAL CARTRIDGE ultima version con Freezer 

FREEZE FRAME para copies de sesruridad pasa C a C,C a D.D a D 
y D a C.con copiador para prosramds seeuenci a] es, f ormateador 
rapidoflO ST) ,y i os cOJJiaiKfos del dos en modo directo 

ISEPIC Pssa de cinta a disco en pocos bloques .permi tiendote 
entrar dentro del prcfframa desprotej ido 

SECURITY CASS Interface, copiador de cinta a cinta 

SQtWD SAMPLER Muestreadgr ..anal o^ico digi tal ..Fermi te almacenar 
, ,, pa^a .;sa- pos-teri or .manjp.u2 aci on cuoiyuier soni'do real Voz 

:n?frufljentbst-cia mitpofono o linta) .Con posibi 1 id&de's u- arias 
.coffiO ..-.to/iacidad, eco, reverse, retardo , conexi.on, MIDI , ....... 

SOUND EXPANDER Amp I ia. a oojio (/oces Jas posijb'i Mdades del sinte- 

tizador.Sintesis de sonidos en . Indorpora -Pat rones- Ramios' ' 
y melodiqos asi corao iajoir . Posibi ] idaci de" commoner a tiempo -' 
real o soire parti tur* , e^Jace MIDI 

SUPER: GRAPH I X Da in-f ini tas ■ posibi 1 idades a & impresora' 

LASER Turbo acel erador ' de disco con comandos del dos 

QUICK DISK PLUS + Turbo acelerador comandos del DOS 

DIG I DRUM Conirierte fcu Cp,mm<Jtfore en una bateria 

GRABADQR DE EPROM 

SUPER DOLPHIN Turbo acelerador entre 20 y 25 voces con monitot 
de codsa-o maquma .proyrnma las teclas de f unci on y muchas 
otras Gpoiones- *' 

SIMONS BASIC Da 114 comandos mas a tu Conjmodore 

EXPANSOR DE CARTUCHQS conecta varios cartuchos a t n vez 

INTERFACE MIDI 

VENT I LADOR AXIAL 

FUENTE A LIMENTA CI ON 64 




NOVEDADES 



FIST U - GHQST'N GOBLINS - PARALLAX - SOUTHERN BELL - SILENT SERVICE 
SUPER CYCLE - KAIL ORDER MONSTER - ALLEY CAT - WAR - TRAP - HACKER If 
ASTER1X - DRAGONS LAIS - HI SI ON A.D. - KN1CUT RIDER - SOUTHERN BELL 
INFILTRATOR - BISLESS - EXPRESS RAIDER - GREAT ESCAPE - MIAKI VICE 
SPITFIRE 40 - FLIGHT BECK - TIME TRAX - EQUINOX - WAR PLAY - ACE 
TUBULAR BCLL - SHOGUU - ULTRA GAMES - FIONA - MOVIE - BATMAN - GUNSHIP 
MARBLE HARNESS - TAU CETY - MERCENARY - SPIHD1ZY - PAPER .BOY - MICK1" 
y cersa ds mil tituloa mas nuj continuaoiBnta fan aiwientando . 




HARDWARE 
128 D 130000 



64 
64c 
1541 
1541C 



40500 
44500 
49900 
49900 



NLIOstar 83000 
Seikosa 57500 
Riteman 67.500 
Monitor F 28000 
Monitor C 65000 



UTILIDADES 
Disponible todo de 
Casa de Software 
Cimex 
SEINFO 
HISPASOFT 
FERRE MORET 
SAKATY 
y productos impor 
tados por nosotro 



EDUCATIVOS 



El BstmJiajr no tiene por qua ser posado y una incordia . puede ser djVertidc 
Y una competicion entre varies aminos , teni ertdo ai Drdenador corr» urbrito. 
Hemes lanrado ai toeroado una sarin de prosrrairias EDUCATIVOS pari 5.6,7,y g 
de ESB , hechs por profesores da acuvrdo a Jaa norma del MIKISTESio 
DE EDUCAClOtI Y CIE1IC1A y gua rasuman las editoriales mas importantes de 
fljta cut-so. 

Dele la oportunidad a su hi jo da gua pueda cortspetir ™tra eJ ordenador o 
sus propios cbwpaneros , en un proar&ma 7 ue .poco a pscc la aj-udara a do- 
minar los tsmas irua esta sstudlando an este curso . 
Si denes recibir mas informacion ascribanos o llamenos por Colefono 
CATALQGO GRATV1T0 



Si qui area recibir 



' i od j <7afsan t * informac 



sobra ultimas novedades 
Y articulca a la venta fotocopia o reoorte ests cutxsn y ent-ieio 

NQfflBE 

DIHECCIOW 

P08L/5CION ' Dp 

TELEfONO , ORDCNADOR 

CALVO ASEIIS10 N.g MADRID 29015 TFNO 2451633 C0»PULANd " 




UNASESION DE GOLF 



DATOS GENERALES 

TTTULO Hole in One 
FABRICANTE Mastertronic 
ORDENAOOR Commodore 64 

TEMA DEL PROGRAMA 

Juego de Golf 



CALIFICACION (Sobre 10 ptos.) 



ORIGINAUDAD 

IKTERES 

GRAFICOS 

COLOR 

SONIDO 



S 

7,5 
9,5 
9,5 
7 



TOTAL 




viene a enriquecer el 
surtido de programas ya 
exi stentes . 
Hay dieciocho hoyos y 
puedes eLeglr el tipo de 
palo a utiLizar en cada 
goLpe de joystick. 
Dispones de La i nf ormaci6n 
precisa: distancia y par, 
asl como La veLocidad y 
direcci6n deL viento. En La 




perspective t ri di mensi ona L . 
Puedes jugar con eL 
teclado, pero es preferible 





EL sano deporte del goLf ha 
marcado una tendencia en 
Los videojuegos. Hole in 
One es otra version ue 



caratuLa deL programa 
aparece tambien eL mapa deL 
campo de juego. 
Los graficos muestran una 



eL joystick, aunque en La 
muchos casos eL refLejo deL 
movimiento no parecio ser 
eL que esperabamos . 



ALLEYKAT 



Nuevamente el Uridium 
parece haber sido La pieza 
inspiradora de otro juego. 
ALLeykat es una camera por 
eL miximo tituLo. Esta vez 
eL movimiento de La nave y 
eL fondo se produce en 
sentido verticaL, desde 
abajo hacia La parte 
superior de La pantaLLa. 
Existen obstacuLos, taLes 
como arcosy- que debes 
sortear para no estreLLar 
La nave. 

Se supone que La zona de 
vueLo son ruedas situadas 
en eL espacio y existen 
ocho diferentes, con 
coLorido e incLuso 





DATOS GENERALES 


TTTULO Alleykat 




FABRICANTE Hewson 




ORDENADOR Commodore 64 




TEMA DEL PROGRAMA 




Combate Espacial 








CALIFICACION (Sobre 10 ptos.) 


ORIGINAUDAD 


7 


INTERES 


7 


| GRAFICOS 


9 


; COLOR 


9 


j SONIDO 


7 


1 TOTAL 


39 
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superficies clistintos en 
cada caso. Para ganar eL 
premio en una de Las 
treinta y dos carreras, 
deberas ser cuidadoso aL 
eleglr. Lo harSs de acuerdo 
con eL dinero disponibLe y 
tus habi Lidades 
parti cuLares . 

Las carreras incLuyen ocho 
tipos de prueba, que son 
una Ligera variante entre 
si . Se puede optar por 
volar a toda marcha, 
compLi candose Las 
posibi Lidades de 



supervivencia. Se puede 
reaLizar vuelo de fondo, 
procurando dinicamente 
permanecer intacto. 
Destruir eL paisaje, sin 
dejar piedra sobre piedra, 
es otra opci6n. IncLuso 
puedes practicar eL s La Lorn 
entre Los obstacuLos de La 
pi sta . 

Comprueba eL numero de 
vueLtas que das, dejandoLo 
cuando estes contento con 
tu puntuacion, para despues 
acudir a La siguiente 
carrera. 



EL tiempo se mide en 
extranos meses galacticos, 
reaLizandose una 
convocatoria por mes 
En La superficie aparecen 
depositados caracteres con 
La forma de La Letra E, que 
son puntos de energla. De 
acuerdo con tu habi lidad, 
te sera permitido llevar 
mas de Los cinco iniciaLes 
energ^ti cas . 

Los efectos de sonido han 
sido cuidadosamente 
programados, Lo mismo se 
puede decir de La m6sica. 



EL COCHE FANTASMA 



Este coche fantastico 
parece haber salido con 
cierta premura, sin duda 
provocada por La ostentosa 
campana publicitaria en 
Las revistas de Gran 
Bretana. Por otra parte se 
habia creado una gran 
espectaciin en torno a este 
titulo. 

Has asumido La personalidad 
de Michael Knight y viajas 
a bordo deL increibLe 
K.I.T.T. 

AL comenzar eL juego te 
encuentras en La cuidad de 
Atlanta (Georgia, E.E.U.U) 
y recibes una comunicaciAn 
de Devon en la que este te 
pone en la pi sta de un 
grupo terrorista que esta 
tratando de perturbar La 



paz mundial, pretendiendo 
asesinar aL embajador ruso. 
La verdad es que se trata 
de una tarea muy diflcil la 
encomendada a nuestro heroe 
del momento, ya que a Lo 
largo del juego -tal y como 
sucedia en La reaLidad- no 
dispone de armas- 
EL juego se desarolla en 
base a tres pantallas 



diferentes. Una muestra eL 
mapa de Los Estados Unidos, 
en eL que aLgunas cuidades 
aparecen resenadas (Miami, 
Chicago, Dallas. 
Veras que en esta pantalLa 
La cuidad en que te 
encuentras parpadea y La 
primera indicaciAn que 
aparece bajo el mapa te 
dir5 lo que tienen los 









33: 30: 2a 

_ 







DATOS GENERALES 




| TfTULO Knight Rider 


■■■■■■■■ 


! FABRICANTE Ocean 




, 0RDENAD0R Commodore 64 




TEMA DEL PROGRAMA 




Serie de Television 








CALIFICACION (Sobre io ptos.) 


0RIGINAL1DAD 


8,5 


INTER ES 


8 


GRAFICOS 


9 


COLOR 


8 


SONIDO 


8 


TOTAL 


41,5 



INPUT ©1 



Te- stas en esa cuidad ( conduce y tu disparas o at del turbo, etc 



5_ =~ - eria, sede o bien el 

-5 segunda pantaLla de 

. t : : ~- s La que mas a 
- -.- _ : : aparece en el j uego . 
£= ^3 vista en perspectiva 
zz := n retera en La que 
se-is atacado por una serie 
copteros- 
etapa eL juego 
dos opciones: KITT 



:t -e Li 



reves . 

DeL supersa L pi cadero de 
KITT que aparece en La 
caritula deL juego solo 
quedan unos pocos 
controLes: un indicador 
digital de velocidad, un 
contador de tiempo, un 
indicador de danos, y un 
indicador de ca Lentamiento 
del laser. No queda nada 



El efecto de conducci6n al 
girar eL volante no es 
demasido rico y ni siquiera 
se mueve el que se ve en la 
pantalLa- Tampoco aparecen 
otros vehiculos. 
Una interesate posibiLidad 
consiste en la detenci6n 
del juego, presionado la 
tecla RUN/STOP. 



S O FT ACTUAL I DAD 




AS DE ASES 

La harto conocida f i rma 
Accolade, popular por el 
extremo cuidado con que 
elabora Los graficos de sus 
programas, ha adaptado un 
Best Seller europeo:Dam 
Busters. 

La verdad, no es soLamente 
una adaptaci in, sino una 
enorme mejora respect aL 
programa original. 
Existe ina opci6n de 
entrenamiento, pasando 
despues al de ataque real y 
aL ataque a una presa, sea 
convoy de treneso incluso a 
grupos de submarines. La 
animaci6n es extraordi nari a 
y el sonido est a" totalmente 
en la linea de la casa. 





HACKER 

(SEGUNDA PARTE) 

Fa "a todos Los que se 
. : . . : i -on locos con Hacker 
I, Activision lanzi la 
segunda parte de este 
-e-srenal j uego de 
est^ategia y acci6n. 
Esi= ,ez La trama se 
desarroLla en la central de 
inteLigencia de los 

EC. "" rt "i COS . 



En cuatro ventanas veras 
simuLtaneamente el 
desarrollo del juego. 
Deberas utilizar cinco 
robots para sonsacar a Los 
cientificos rusos y evitar 
asl que lleguen a crear el 
arma mortlfera que pudiera 
romper el i nestable 
equi Ubrio mundial . 
Esta vez Los robots van 
equipados de camara, 
acceLeradores, monitores, 
busca personas, etc 



En cualquier caso, hara La 
delicia de todos los que 
disfrutamos de la primera 
parte. 

it it it it-kit it it it it 

THE PAWN 

"EL juego conversacional 
The pawn es eL mejor juego 
de aventura que jamas se ha 
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r 



"sWdeSoftwo^ 



reLizado en cuaLquier 

si sterna, aunque imicamente 

existe por ahora en versi6n 

ATARI. 

Esto era cierto hasta hace 
muy poco: ya que La versifin 
para Commodore pronto 
saLdra aL mercado y hay que 
ver La caLidad que aLcanzan 
estos programadores de 
Rainbird, incLuso e L 
pLanteamiento deL juego es 
i nteresante . 
Cada pantaLLa aparecera 
partiendo de un scrooLing 
desde La parte superior, 





resaLtando parti cuLarmente 
por La caLidad grafica, si 
Lo hace por La variedad de 
La animaciin de Los 
j ugadores . 

No hay que perderse eL 
efecto deL jugador que se 
tira en pLancha para 



a L g o n ove o'oso, s in- em b arg o 
Chess Kate 2000 Lo consigue 
pLen.ame.nte - : 
Imagi naros 
a j edrez en 
regular el 
jugadas de 
reaLizara eL 
ordenador- 



un juego de 
eL que puedes 
namero de ".^ 
previsi6n que 




E st e e s un j ueg o q u e 



te 



57/ 



ehsena. a ganar _ i.nefi candote : : 
todos Los raovi mi entos que 
p uedes r e a L i z a r c o n Las 
piezas, que tiene opcion bi 
y t r i d i men s To n a t * y rn u c h as 
cosas mas. Con eL que 
puedes pedir ayuda en Los 
momentos dificiLes y que 



ERROR: ioerror 
OFFENDING COMMAND: image 

STACK: 



